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new loader errors, relocatable overlays, CONTRPV macro, SUBMIT 
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the operating system. 

K July, 1982 - Reprint. This reprint incorporates revision J 
with change packet J-01. No other changes have been made. 
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Revision Description 

L July, 1983 - Revision L is a rewrite of this manual. 

Extensive editorial changes have been made, including moving 
macro information which was in part 3 to publication SR-0012, 
Macro and Opdefs Reference Manual, Other major reorganization 
has occurred. Part 3 now contains job control language 
structures. Information has been added on interactive job 
processing and job step abort processing. Major new features 
documented include enhanced support of tape datasets, the 
FETCH control statement, memory management, enhancements to 
COS security, permanent dataset privacy, and support of the 
CRAY X-MP Computer System. Miscellaneous editorial and 
technical changes have been made to bring the documentation 
into agreement with version 1.12 of the operating system. All 
previous versions are obsolete. 

L-01 October, 1983 - This change packet describes two new ACCOUNT 
control statement parameters: APW and NAPW. The use of APW 
and NAPW, and their interrelationship with existing parameters 
on ACCOUNT, are also explained. A new parameter on the AUDIT 
control statement, ACC, is described. In addition, 
illustrative information is provided on how the OWN parameter 
of the AUDIT utility affects output listings. 

L-02 February, 1984 - This change packet supports the COS 1.13 

release. It includes editorial and technical amendments to 
information which had been included in previous versions of 
this manual. The contents reflect new multitasking 
capabilities. Additional information has been included for 
coding the CALL statement. New parameters have also been 
documented in this manual for foreign dataset processing, 
particularly on the ASSIGN and ACCESS control statements. The 
LDR statement has been modified considerably; RELEASE, SAVE, 
MODIFY, DELETE, PERMIT, ACQUIRE and PDSLOAD also have new 
parameters. Furthermore, new information is included for 
managed memory capabilities, the EXITIF control statement 
block identifier, the COPYU utility for unblocked datasets, 
and new error codes for reprieve processing. 



SR-0011 vi M 



Revision Description 

M December, 1984 - This reprint with revision describes many 
technical changes to COS for the 1.14 release, including 
contiguous disk allocation and the tape features multitape 
mark, online tape ring processing, partial IBM multifile, 
special end-of-volume processing, and superblock size. The 
revision describes software to support four-processor CRAY 
X-MPs and systems with up to 8 million words of memory. 
Appendix B provides instructions for Subsystem Support: 
inter job communication, user channel access, and event 
recall. This revision also documents the Integrated Support 
Processor (ISP). Note that ISP code will be released later. 

This revision contains several format changes. To increase 
the accuracy of the tables and related information in appendix 
A, the section is printed as generated by the system. In the 
body of the manual the "parts" have been removed and the 
sections numbered consecutively. Material in the four 
sections of part 3 has been consolidated into one section, 
16. All previous printings are obsolete. 
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PREFACE 



This manual describes the external features of the Cray Operating System 
(COS) . It is intended as a reference document for all users of COS. The 
manual deals with three aspects of COS: 

• Job processing. Sections 1 through 5 discuss the fundamentals of 
creating and running jobs on a Cray Computer System. These 
sections describe the system components, storage of information on 
a Cray Computer, and job processing. They also introduce COS job 
control and describe the use of libraries. 

• Job control statements. Sections 6 through 15 describe each COS 
job control statement and give the format of each with an 
explanation of its function. 

• Control statement structures. Section 16 describes the control 
statement block structures available with COS. Examples at the 
end of the section demonstrate the COS control statement procedure 
substitution process. 



Other CRI publications that may be of interest to the reader are; 



Products and Utilities 

SR-0010 Software Tools Reference Manual 

SR-0013 UPDATE Reference Manual 

SG-0055 Text Editor (TEDI) User's Guide 

SG-0056 Symbolic Interactive Debugger (SID) User's Guide 

SR-0066 Segment Loader (SEGLDR) Reference Manual 

SR-0073 Cray Simulator (CSIM) Reference Manual 

SR-0074 SORT Reference Manual 



Languages 



SR-0000 CAL Assembler Version 1 Reference Manual 

SR-0009 FORTRAN (CFT) Reference Manual 

SR-0012 Macros and Opdefs Reference Manual 

SR-0014 Library Reference Manual 

SR-0060 Pascal Reference Manual 
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Hardware 



HR-0004 CRAY-1 Hardware Reference Manual 

HR-0029 CRAY-1 S Series Mainframe Reference Manual 

HR-0030 CRAY I/O Subsystem Reference Manual 

HR-0032 CRAY X-MP Series Mainframe Reference Manual 

HR-0064 CRAY-1 M Series Mainframe Reference Manual 

HR-0630 Mass Storage Subsystem Hardware Reference Manual 



Miscellaneous 



SR-0039 CRAY-OS Message Manual 
SN-0222 Multitasking User Guide 
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INTRODUCTION TO JOB 
PROCESSING 



The Cray Operating System (COS) is a multiprogramming, multiprocessing, 
and multitasking operating system for Cray Computer Systems. The 
operating system provides for efficient use of system resources by 
monitoring and controlling the flow of work presented to the system in 
the form of jobs. The operating system optimizes resource usage and 
resolves conflicts when more than one job is in need of resources. 

COS is a collection of programs residing in Cray mainframe Central Memory 
or on system mass storage following startup of the system. (Startup is 
the process of bringing the Cray Computer System and the operating system 
to an operational state.) 

Jobs are presented to the Cray Computer System by one or more computers 
referred to as front-end computers (also referred to as stations in 
Cray Research manuals) . A front-end computer can be any of a variety of 
computer systems. Software executing on the front-end computer system is 
beyond the scope of this publication. 

COS includes linkages providing for the initiation and control of 
interactive jobs and data transfers between the Cray Computer System and 
front-end terminals. These features are available only where supported 
by the front-end system. 

The FORTRAN compiler (CFT) , library routines, the CAL assembler, and the 
UPDATE source maintenance program are described in separate publications. 



HARDWARE REQUIREMENTS 

The Cray Operating System (COS) executes on the basic configuration of 
any CRAY-1 or CRAY X-MP Computer System. Each computer system contains 
the following components: 

• One or more Central Processing Units (CPUs) 

• Central Memory 

• An I/O Subsystem (IOS) or a minicomputer-based Maintenance Control 
Unit (MCU) . The I/O Subsystem performs all required Maintenance 
Control Unit functions. 
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• A Mass Storage Subsystem. The Mass Storage Subsystem consists of 
disk drives, an optional Solid-state Storage Device (SSD) , and IOS 
Buffer Memory (BMR) . 

• An optional IBM-compatible tape subsystem. The tape subsystem 
requires that an I/O Subsystem be present. 

The I/O Subsystem consists of from two to four I/O processors and 
one-half million, one million, four million, or eight million words of 
shared Buffer Memory. The optional tape subsystem is composed of at 
least one block multiplexer channel, one tape controller, and two tape 
units. The tape units supported are IBM-compatible 9-track, 200 ips, 
1600/6250 bpi devices. 

Figure 1-1 illustrates a basic system configuration. For more 
information about CRAY-1 or CRAY X-MP hardware characteristics, refer to 
the appropriate mainframe reference manual listed in the preface. 



SYSTEM INITIALIZATION 

COS is loaded into Central Memory and activated through a system startup 
procedure performed at the I/O Subsystem or MCU. At startup, linkage to 
the Permanent Dataset Catalog (DSC) is reestablished on mass storage. 
All permanent mass storage datasets are recorded in the DSC; thus, 
permanent datasets survive startup and the user can always assume that 
they are present. See section 2 of this manual for more information on 
datasets. 



CENTRAL MEMORY ASSIGNMENT AND CHARACTERISTICS 

Central Memory is shared by COS, jobs running on the Cray mainframe, 
dataset I/O buffers, and system tables associated with those jobs. COS 
allocates resources to each job, when needed, as these resources become 
available. As a job progresses, information is transferred between 
Central Memory and mass storage. These transfers can be initiated by 
either the job or by COS. 

Figure 1-2 illustrates the assignment of memory to COS and to jobs. 
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Figure 1-1. Cray Computer System configuration 



MEMORY-RESIDENT COS 

COS occupies two areas of Central Memory. The memory-resident portion of 
the operating system occupying lower memory consists of Exchange 
Packages, the System Executive (EXEC) , the System Task Processor (STP) , 
and optionally the Control Statement Processor (CSP) . The 
memory-resident portion of the operating system occupying extreme upper 
memory contains station I/O buffers, space for the system log buffer, and 
Permanent Dataset Catalog (DSC) information and buffers. 
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Figure 1-2. Central Memory assignment 



USER AREA OF MEMORY 



COS assigns every job a user area in Central Memory, 
consists of a Job Table Area (JTA) and a user field. 



The user area 



Job Table Area - JTA 

For each job, the operating system maintains an area in memory that 
contains the parameters and information required for monitoring and 
managing the job. This area is called the Job Table Area (JTA) . Each 
active job has a separate Job Table Area adjacent to the job's user 
field. The Job Table Area is not accessible to the user, although it can 
be dumped for analysis (see section 13 of this manual) . 
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User field 

The user field for a job is a block of memory immediately following the 
job's JTA. The user field is always a multiple of 512 words. The 
beginning or Base Address (BA) and the end or Limit Address (LA) are 
set by the operating system. The maximum user field size is specified by 
a parameter on one of the job control statements (see section 6) or by 
installation-defined default. A user can request changes in user field 
size during the course of a job. 

Compilers, assemblers, system utility programs, and user programs are 
loaded from mass storage into the user field and are executed in response 
to control statements in the job deck. Each load and execution of a 
program is referred to as a job step. 

A detailed description of the contents of the user field is given in 
section 3 of this manual. Briefly, however, the first 200s words of 
the user field are reserved for an operating system/job communication 
area known as the Job Communication Block (JCB) . Programs are loaded 
starting at BA+20O3 and reside in the lower portion of the user field. 
The upper portion of the user field contains tables and dataset I/O 
buffers. The user field addressing limit is equal to LA-1. 

Memory addresses for instructions and operands are relative to BA. The 
Cray mainframe adds the contents of BA to the address specified by a 
memory reference instruction to form an absolute address. A user cannot 
reference memory outside of the user field as defined by the BA and LA 
register contents; LA-1 is the user limit. (Refer to the appropriate 
mainframe hardware reference manual noted in the preface for more 
information.) 



MASS STORAGE CHARACTERISTICS 

All information maintained on mass storage by the Cray Operating System 
(except specific pre-allocated areas such as the Device Label) is 
organized into quantities of information known as datasets. In 
general, the user need not be concerned with the physical transfer of 
data between the disks and memory nor with the exact location and 
physical form in which datasets are maintained on mass storage. COS 
translates the user's logical requests for data input and output into 
disk controller functions automatically. 

Each disk storage unit contains a device label, datasets, and unused 
space to be allocated to datasets. The device label notes usable and 
unusable (unflawed and flawed) space on the disk unit and designates one 
of the devices as the Master Device. The Master Device is the disk 
storage unit containing a table known as the Dataset Catalog (DSC) , 
which contains information for maintaining permanent datasets. 
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To the user, mass storage permanent datasets are always present and 
available on mass storage. This permanence is achieved through 
techniques permitting the datasets noted in the DSC to be recovered or 
reestablished in the event of system failures. Portions of COS, such as 
the loader, utility programs, the compiler, the assembler, and library 
maintenance and generation routines, reside in permanent datasets 
accessible by user jobs at any time. 

Datasets containing job input decks and output from jobs also reside on 
mass storage. Because these datasets are listed in the Dataset Catalog 
they are also regarded as permanent. This designation is somewhat 
misleading since their permanence is by definition rather than by tenure 
in the system. That is, the input dataset is permanent from the time it 
is staged from the front-end system to the Cray Computer System until the 
job terminates. Output datasets being disposed to a front end are 
permanent from job termination (or whenever the disposition was 
initiated) until the disposition is complete. The permanence of these 
system-defined datasets allows them to be recovered along with other 
permanent datasets after a system failure. 

Any user job can create a mass storage permanent dataset. It can be 
subsequently accessed, modified, or deleted by any other job having 
correct access privileges and producing the correct permission control 
words when attempting to associate it with the job. Permission control 
words are defined at the time the dataset is designated as permanent 
(that is, saved) . 

A permanent dataset ceases to be permanent when a user with the correct 
permission control word deletes it. This deletion notifies COS that the 
space occupied by the dataset is no longer permanent. However, the space 
is still reserved by the dataset until it is released by the user (see 
sections 8 and 10, respectively, for information on the RELEASE and 
DISPOSE control statements) . 

In addition to the various permanent datasets, mass storage is used for 
temporary datasets. A temporary dataset is created by the job using it 
and remains temporary unless it is designated as permanent, released, or 
disposed to a front end by the job. A temporary dataset neither saved as 
permanent nor disposed of is termed a scratch dataset and ceases to 
exist when the job releases it or terminates. 

COS allocates space to datasets as needed by tracks. Storage assigned to 
a single dataset can be noncontiguous and can even be on multiple disk 
units. Default and maximum sizes for datasets are defined by system 
parameters. The user has limited control over the allocation of storage 
to a dataset through the ASSIGN control statement. 
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MAGNETIC TAPE CHARACTERISTICS 

An I/O Subsystem can include an Auxiliary I/O Processor (XIOP) with the 
capability of addressing up to 16 block multiplexer channels of tape 
units. Each block multiplexer channel can be attached to IBM-compatible 
control units and tape units in a variety of configurations. The block 
multiplexer channels communicate with the control units and tape units to 
allow reading and writing data that can also be read and written on 
IBM-compatible CPUs. The physical characteristics of tape devices are 
summarized in table 1-1. The block sizes in this table are used by the 
COS tape system for transparent-format tape datasets (described in 
section 2) . 



Table 1-1. Physical characteristics of 200 ips, 
9-track tape devices 



Density 
(bits/inch) 


Transfer rate 
(kilobytes/sec) 


Data/2400 ft. 
reel (megabytes) 


Percent of 
reel con- 
taining data 


Block size 
(bytes) 


6250 
1600 


1170 
300 


168 
43 


94 
94 


32768 
16384 
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DATASETS 



Nearly all information maintained by the Cray Operating System (COS) is 
organized into quantities of information known as datasets. The 
following are some of the more important factors to remember about 
datasets. 

• The dataset medium is the type of physical device on which the 
dataset resides. 

• The dataset structure is the logical organization of the dataset. 

• The dataset longevity is the retention period for the dataset. 

• A dataset must be local to be usable. 

• The dataset disposition code tells the operating system what 
action to take when the dataset is no longer local. 

• Each dataset is known by its dataset name. 

• Datasets are read and written using operating system requests 
(user I/O interfaces) . 



DATASET MEDIUM 

Datasets can be classified by medium, as follows: 

• Mass storage datasets 

• Memory-resident datasets 

• Interactive datasets 

• Magnetic tape datasets 

MASS STORAGE DATASETS 

All datasets, unless otherwise specified, reside on Cray mass storage, 
that is, on mass storage attached directly to the mainframe or to the I/O 
Subsystem. 
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MEMORY-RESIDENT DATASETS 

Some datasets can be specified by the user as memory-resident datasets. 
A memory -resident data&et is wholly contained within one buffer (see BS 
parameter on the ASSIGN control statement in section 8 of this manual) 
and remains in memory at all times. Such a dataset ordinarily occupies 
no mass storage. A memory-resident dataset is normally a temporary 
dataset; however, a mass storage permanent dataset can be declared memory 
resident. 

A dataset can be declared memory resident to reduce the number of I/O 
requests and disk blocks transferred. Memory residence is particularly 
useful for intermediate datasets not intended to be saved or disposed to 
another mainframe. All I/O performed on a memory-resident dataset takes 
place in the dataset buffers in memory and the contents of the buffers 
are not ordinarily written to mass storage. Such a dataset cannot be 
made permanent, nor may it be disposed to another mainframe, unless 
copied to mass storage. 

Normally, a memory-resident dataset is empty until written on. If an 
existing dataset is declared memory resident, it is loaded when the first 
read occurs. A user attempting to write to a memory-resident dataset 
must have write permission. However, as long as the buffer does not 
appear full, no actual write to mass storage ever occurs. Therefore, 
changes made to an existing dataset declared memory resident are not 
reflected on the mass storage copy of the dataset. 

A memory-resident dataset must be defined through an ASSIGN control 
statement containing the MR parameter or through an P$DNT call to the 
system. If the F$DNT call is used, the Dataset Definition List (DDL) 
supplied should specify DDMR=1. (See the description of the ASSIGN 
control statement in section 8 of this manual.) In addition, the buffer 
size parameter should specify a buffer large enough to contain the entire 
dataset plus one block. 

If at any time the system I/O routines are called to write to the dataset 
and the buffer appears to be full, the dataset ceases to be treated as 
memory resident, the buffer is flushed to mass storage, and all 
memory-resident indicators for the dataset are cleared. 

Magnetic tape, execute-only, and interactive datasets cannot be declared 
memory resident. 



INTERACTIVE DATASETS 

A dataset can be specified as interactive by an interactive job, provided 
that interactive datasets are supported by the front end. Batch users 
cannot create interactive datasets. An interactive dataset differs from 
a local dataset in that a disk image of the dataset is not maintained. 



SR-0011 2-2 M 



Instead, records are transmitted to and from a terminal attached to a 
front-end station. Record positioning (for example, REWIND or BACKSPACE) 
is not possible. 

Interactive datasets can be created by interactive jobs through the use 
of the ASSIGN control statement or F$DNT system call. 



MAGNETIC TAPE DATASETS 

A magnetic tape dataset is available to any job declaring tape resource 
requirements on the JOB statement and specifying the appropriate 
information on its ACCESS request. 

To gain access to an existing tape dataset for reading and/or rewriting, 
the correct file identifier (permanent dataset name) , the desired device 
type, and, optionally, a volume identifier list must be specified. The 
volume identifier list can consist of 1 to 255 volume identifiers. If 
the permanent dataset name (PDN) is omitted from the ACCESS request, the 
local dataset name is used as the file identifier. 

To gain access to a tape dataset for creating, the file identifier, 
desired device type, and the NEW parameter option must be specified on 
the ACCESS request. If no file identifier is present, the local dataset 
name is used. If the volume identifier list is missing from the access 
request, it is called a non-specific volume allocation* A specific 
volume allocation occurs when the volume identifier list is present at 
the time of the access request. New tape datasets must be written to 
before a read is allowed. 

Other options describing the tape dataset are available from the access 
request. See the ACCESS control statement description (section 9 of this 
manual) for more details. Using other parameter options allows more 
efficient tape dataset descriptions. 

COS automatically switches volumes during dataset processing unless user 
EOV processing is requested, and returns to the first volume of a 
multivolume dataset in response to a REWIND command. If a permanent 
write error occurs when trying to write a tape block for the user, COS 
automatically attempts to close the current volume and continues to the 
next volume. 

The COS tape system uses Buffer Memory as a tape block buffering area so 
that the job's I/O buffer need not be as large as the tape block (as with 
other operating systems) . This technique can result in significant 
memory savings whenever large tape blocks are being processed and in 
increased transfer rates whenever smaller blocks are being processed. 
The advantage in having a large COS buffer is a reduction in the overhead 
in the tape subsystem. 
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USER TAPE END-OF- VOLUME PROCESSING 

The user tape end-of-volume (EOV) feature allows the user to gain control 
at tape end of volume and perform special EOV and BOV processing. The 
macros used are SETSP, STARTSP, ENDSP, TAPESTAT and CLOSEV. These macros 
are used on individual datasets. If EOV processing is needed for more 
than one dataset, the macros must be issued for each tape dataset. Refer 
to CRI publication SR-0012, Macros and Opdefs Reference Manual for more 
information. 

The user instructs the system to perform EOV processing by issuing the 
SETSP macro (with the ON option) after a tape dataset is opened. Using 
SETSP with the OFF option informs the system that EOV processing is no 
longer needed. The CLOSE macro also terminates EOV special processing. 

To test that the tape dataset is at EOV, you must use the TAPESTAT macro 
after every READ, WRITE, and SYNCH macro. Not all macros that result in 
I/O operations return EOV status; for example, the CLOSE, POSITION, and 
REWIND macros do not return EOV status. For output datasets, the user 
should use the SYNCH macro to flush the buffers and check to see if EOV 
has been encountered before using such macros. 

After EOV is encountered, the user starts EOV processing by issuing the 
STARTSP macro. During EOV processing the user may do read, write, and 
position operations. Volume switching is done by issuing the CLOSEV 
macro. When EOV processing is completed, the ENDSP macro notifies the 
system to return to normal processing. 

During EOV processing, no read ahead is performed. Data blocks are read 
one at a time. Also, a position request with relative block number is 
positioned from the current tape position, not from the last I/O block. 

For an output dataset, the data in the IOP buffer when EOV is encountered 
is considered part of the dataset and may be read during EOV processing. 
Once the data is read, it is no longer part of output data. Because no 
read ahead is performed during EOV processing, the program may position 
backwards and read only the blocks on the tape. If this is the case, the 
data in the IOP buffer is written to tape when the ENDSP macro is issued. 

The use of the CLOSEV macro is not restricted to the EOV routine. The 
CLOSEV macro may be issued by the user anytime during dataset 
processing. This macro allows the user to terminate an output tape 
anywhere and continue the dataset on the next tape. It also allows the 
user to read part of a tape and switch to the following tape. 



TAPE MARK PROCESSING BY TQM 

Three label types are available that allow tape marks to be embedded in 
data. They also allow a user to process the tape mark as data and 
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continue processing after its occurrence is detected. The label types 
are specified on the ACCESS statement and allow processing of field ANSI 
labels (FAL) , field standard IBM labels (FSL) , and field nonlabeled (FNL) 
tapes. 

When TQM recognizes a tape mark in the data, it translates it to an EOF 
record control word and puts it in the data. The user gets a tape mark 
indication when processing the data using the TAPESTAT macro and then is 
able to continue normal processing. The recognition of end-of-file 
conditions is the responsibility of the user. 

To keep the program from running off the end of the tape on reads, the 
software stops processing (that is, no reading ahead occurs) when a tape 
mark is detected and does not move forward until the user catches up to 
the tape position, recognizes the tape mark, and issues further read 
commands . 

Any attempt to position past a tape mark (using the POSITION macro) 
results in the tape moving until the tape mark is encountered. At that 
point, tape movement stops and the user job gets control. A residual 
record count is returned to find the position on tape. The tape is 
physically positioned after the tape mark just encountered. 

For input, all field format tapes (FAL/FNL/FSL) are processed for labels 
in the same way. At BOT, if a label is encountered it is validated based 
on its type. If no label is found, there is no validation. When a 
tapemark is detected, the system checks the next record for a E0V1 or 
E0F1 trailer label. If E0V1 is found, the system performs an automatic 
volume switch. If an EOF1 is found, the system performs end-of-data 
processing. If neither E0V1 or E0F1 is encountered, the tape is left 
positioned immediately following the tape mark ready for the next read. 
Tapes not terminated with either SL or AL standard labels must be 
terminated by the program using CLOSE or CLOSEV system calls. 

For output, field format tapes are labeled based on the LB parameter on 
the ACCESS statement. End-of -volume labels are processed when either the 
EOT reflective marker is sensed or when the user program calls the CLOSEV 
routine. End-of-file labels are written when the dataset is closed, 
rewound, or released. 



DATASET STRUCTURE 

COS supports several dataset structures: 

• Blocked format 

• Interactive format 

• Unblocked format 

• Tape formats (interchange or transparent) 
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BLOCKED FORMAT 

Blocked format is used by default for external types of datasets, such as 
user input and output datasets. Record positioning requires a blocked 
format. The blocked format adds control words to the data to allow for 
processing of variable-length records and to allow for delimiting of 
levels of data within a dataset. A blocked dataset can be composed of 
one or more files, which are, in turn, composed of one or more records. 
Figure 2-1 illustrates the data hierarchy within a dataset. 



Dataset 



File 




File. 



Record 



File r 




Record 2 



Record, 



Figure 2-1. Data hierarchy within a dataset 



The data in a blocked dataset can be coded and/or binary. Blanks are 
normally compressed in blocked coded datasets. Each block consists of 
512 words. Blocked datasets use two types of control words: block and 
record. 



Blank compression 

Blank fields can be compressed for blocked coded files. Blank field 
compression is indicated by a blank field initiator code followed by a 
count. The default blank field initiator code is defined by the 
installation parameter I@BFI which is either an ASCII code or 777s 
indicating that blank compression will not be done. Blank compression 
can be inhibited using an ASSIGN statement parameter or an F$DNT system 
call. A blank field of 3 through 96 characters is compressed to a 
2-character field. The count is biased by 36s; the actual character 
count is limited to 41 g <_ character count <_ 176 8 (the ASCII graphics) . 
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Block control word 

The block control word (BCW) is the first word of every 512-word block. 
The format of a block control word is depicted in figure 2-2. 
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Figure 2-2. Format of a block control word 



Field 



Bits 



Description 



M 



0-3 



Type of control word (for block control word, 
M=0) 



BDF 



11 



Bad Data flag; indicates the following data, up 
to the next control word, is bad. This flag is 
set by the I/O Subsystem for magnetic tape 
datasets in interchange format. 



BN 



31-54 Block number. Designates the number of the 
current data block. The first block in a 
dataset is block 0. 



FWI 



55-63 



Forward index. Designates the number of words 
(starting with 0) to the next record control 
word or block control word. 



Record control word 

A record control word (RCW) occurs at the end of each record, file, or 
dataset. The format of a record control word is illustrated in figure 
2-3. 



TRAN-v 
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Figure 2-3. Format of a record control word 



Field 



M 



Bits 



0-3 



Description 

Type of control word: 

10 8 End-of -record (EOR) 
16 8 End-of -file (EOF) 
17 8 End -of -data (EOD) 
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Field 



UBC 



Bits 



4-9 



TRAN 



10 



Description 

Unused bit count. For end-of -record, UBC 
designates the number of unused low-order bits 
in the last data word of the record terminated 
by the end-of-record . For end-of-file and 
end-of -data RCWs, this field is 0. The data 
area protected by UBC must be zero-filled. 

Transparent record field; used for an 
interactive output dataset only. If set, 
substitution of end-of-record RCWs is suppressed, 



BDF 



11 



Bad Data flag; indicates the following data, up 
to the next control word, is bad. This flag is 
set by the I/O Subsystem for magnetic tape 
datasets in interchange format. If flag is set, 
an irrecoverable error was encountered in 
following data. 



SRS 



12 



Skip remainder of sector; indicates that the 
next control word to follow is a BCW and the 
data after this RCW is not to be processed. 
This is used only in tape dataset processing. 



PFI 



20-39 



Previous file index. This field contains an 
index modulo 2 20 (20,000,0008) to the beginning 
of the file. The index is relative to the 
current block such that if the beginning of the 
file is in the same block as this RCW, the PFI 
is 0. 



PRI 



40-54 



Previous record (RCW) index. This field 
contains an index modulo 2 X3 (100,0008) to the 
block where the current record starts. The 
index is relative to the current block such that 
if the first word of data in this record is in 
the same block as this RCW, PRI is 0. 



FWI 



55-63 



Forward word index. This field points to the 
next control word (RCW or BCW) and consists of a 
count of the number of data words up to the 
control word (that is, if the next word is an 
RCW or BCW, FWI is 0) . 
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Disregarding block control words occurring at 512-word intervals in a 
dataset, RCWs have the following logical relationship in a dataset. 

An end-of -record RCW immediately follows the data for the record it 
terminates. If the record is null, that is, if it contains no data, an 
end-of-record RCW can immediately follow an end-of-record or end-of-f ile 
RCW or can be the first word of the dataset. 

An end-of-file RCW immediately follows the end-of-record RCW for the 
final record in a file. If the file is null, that is, if it contains no 
records, the end-of-file RCW can immediately follow an end-of-file RCW or 
can be the first word of the dataset. 

An end-of-data RCW immediately follows the end-of-file RCW for the final 
file in the dataset. If the dataset is null, the end-of-data RCW can be 
the first word on the dataset. 

The typical dataset has many end-of-record RCWs per block. An example of 
dataset control words is illustrated in figure 2-4. In this example, a 
dataset is contained within four physical sectors, each beginning with a 
BCW (thus the four BCWs in this example are numbered 0, 1, 2, 3). The 
dataset contains four files shown as Fl, F2, F3, and F4. Fl contains the 
four records shown as Rl through R4; F2 contains records R5 through R7; 
F3 contains no records at all; F4 contains record R8. 



INTERACTIVE FORMAT 

Interactive format closely resembles blocked format; however, each buffer 
begins with a block BCW. Each record transmitted to or from COS by an 
F$RDC or an F$WDC call must contain a single record consisting of a BCW, 
data, and an end-of-record RCW. 

Two formats for interactive output can be assigned when the dataset is 
created: character blocked and transparent. Character blocked mode is 
the default. In character blocked mode, an end-of-record RCW is 
interpreted as a line feed or a carriage return. In transparent mode, 
the end-of-record RCW is ignored and the user is responsible for 
supplying carriage control characters. 



UNBLOCKED FORMAT 

Dataset I/O can also be performed using unblocked datasets. The data 
stream for unblocked datasets does not contain Cray Operating System 
record control words (RCWs) or block control words (BCWs) . 
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Dataset 



Figure 2-4. Example of dataset control words 
(octal values shown) 
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The system does not allocate buffers in the job's I/O buffer area for 
unblocked datasets; the user must specify an area for data transfer. 
When a read or write is performed on an unblocked dataset, the data goes 
directly to or from the user data area without passing through an I/O 
buffer. The word count of data to be transferred must be a multiple of 
512. 

Unblocked I/O cannot be performed on an interchange format tape dataset. 



TAPE FORMATS 

Tape datasets are written and read on tape volumes. A tape volume is a 
reel of tape. A tape volume is also known as a dataset section (for 
example, in FSEC= on the ACCESS statement). 

Data is read or written in tape blocks. A tape block is a unit of data 
recorded on magnetic tape between two consecutive interblock gaps. The 
size of tape blocks can vary from one byte to an installation-defined 
maximum. 

Tape datasets can be read or written using two different formats: 
interchange or transparent. Tape datasets can also be labeled or 
unlabeled. 



Interchange format 

Interchange format facilitates reading and writing tapes that are also to 
be read or written on other vendors' systems. In interchange format , 
each tape block of data corresponds to a single logical record in COS 
blocked format (that is, the data between record control words). 

In interchange format, tape block lengths can vary up to an 
installation-defined maximum which cannot exceed 1,048,576 bytes (131,072 
64-bit words) . It is recommended that the maximum block size not exceed 
100 to 200 kilobytes. Blocks exceeding these sizes may require special 
operational procedures (such as the use of specially prepared tape 
volumes having an extended length of tape following the end-of-tape (EOT) 

reflective marker) and yield little increase in transfer rates or storage 
capacity. 

When a tape dataset is read in interchange mode, physical tape blocks are 
represented in the user's I/O buffer with block control words (BCWs) and 
record control words (RCWs) added by COS. The data in each tape block is 
terminated by an RCW. The unused bit count field in the RCW indicates 
the amount of data in the last word of the tape block that is not valid 
data. A BCW is inserted before every 511 words of data, including the 

RCWs. The formats of RCWs and BCWs are described previously in this 
section and shown in figures 2-2 and 2-3. 
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Figure 2-5 depicts a tape dataset in interchange format. Tape blocks 
within tape label groups are not included in this format. The end of the 
dataset is represented by an end-of-file (EOF) RCW followed by an 
end-of-data (EOD) RCW. 

When a tape dataset is written in interchange format, the data must be in 
the I/O buffer in the user field in COS blocked format. The data in each 
logical record is written as a single tape block. BCWs and RCWs are not 
recorded on tape. BCWs within a record are discarded and the unused bits 
and terminating RCW are also discarded. The unused bit count must be a 
multiple of 8. Tape datasets written in interchange mode must consist of 
a single file (single EOF RCW) . Multiple-file tape datasets are not 
supported in interchange mode. 



Transparent format 

In transparent format (disk image) , each tape block is a fixed multiple 
of 4096 bytes (512 words), generally based on the dataset density (that 
is, 16,384 bytes at 1600 bpi and 32,768 bytes at 6250 bpi) . The data in 
the tape block is transferred unaltered between the tape and the I/O 
buffer in the user field; no control words are added on reading or 
discarded on writing. In transparent mode, the data can be in COS 
blocked format or COS unblocked format. Transparent format tapes are not 
generally read or written by other vendors' equipment. 



DATASET LONGEVITY 

Permanent datasets are retained by the operating system until instructed 
otherwise. All other datasets are considered temporary. 



TEMPORARY DATASETS 

A temporary dataset is available only to the job that created it. 
Temporary datasets can be created in two ways: either explicitly by use 
of the ASSIGN control statement, or implicitly upon first reference to a 
dataset by name or unit number on an I/O request or an OPEN macro call. 

A temporary mass storage dataset is empty until written on. Rewind or 
backspace of the dataset is necessary before it can be read. A temporary 
dataset can be made permanent by use of the SAVE control statement. If 
the dataset is not made permanent, it is released at job termination or 
by the specific RELEASE function request and its mass storage made 
available to the system. 
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TAPE DATA AS IT APPEARS IN I/O 
BUFFER (IN 512-WORD UNITS) 



DATA IN TAPE BLOCKS 



* (Tapemark) 



Header Label 
Group (if labeled) 





last 
data 



(Tapemark) 



End of Data 

Label Group 
(if labeled) 

OR 
End of Volume 
Label 
Group 
(if labeled) 



* (Tapemark) 



Figure 2-5. Interchange-format tape dataset 
(octal values shown) 
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PERMANENT DATASETS 

Only mass storage or magnetic tape datasets can be permanent. 

Magnetic tape permanent datasets 

Tape datasets are discussed under Dataset Media earlier in this section. 



Mass storage permanent datasets 

A mass storage permanent dataset is available to the system and to 
other jobs and is maintained across system startups. Permanent datasets 
are of two types: those created by SAVE requests made by the user or 
front-end system (user permanent datasets) , and input, output, or COS 
internal datasets (system permanent datasets) • 

User permanent datasets are maintained for as long as the user or 
installation desires. They can be protected from unauthorized access by 
use of permission control words and ownership values. 

When a user permanent dataset is accessed via an ACCESS control statement 
(see section 9 of this manual) , it is treated as a local dataset by the 
job requesting access. However, it still exists as a permanent dataset 
on the system and can be used by other jobs unless unique access to that 
dataset was granted. When a user attempts to write to a permanent 
dataset, the write occurs only when the buffer is at least half full. If 
any information in an existing permanent dataset is overwritten or if the 
size of a permanent dataset is changed, an ADJUST should be performed on 
that dataset (see section 9 of this manual) . An ADJUST is performed 
automatically when a permanent dataset is released. 

System permanent datasets relate to particular jobs or reflect the 
current operational state of COS. A job's input dataset is made 
permanent when the job is received by the Cray Computer System and is 
deleted when the job terminates. Output datasets local to the job can 
be disposed while the job is running or can be automatically made 
permanent when the job terminates and then deleted from the Cray Computer 
System after being sent to the front-end system for processing. An 
example of a system permanent dataset is the system log. 

An execute-only dataset is a user permanent mass storage dataset for 
which all forms of examination and modification by users are prohibited. 
An execute-only dataset is loaded by the Control Statement Processor 
(CSP) for execution. It differs in usage from other user permanent 
datasets in several ways: 

• The accessor of the dataset cannot open the dataset for reading or 
writing. 
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• While an execute-only dataset is loaded in memory, no DUMPJOB 
requests are honored. 

• The dataset cannot be staged via a DISPOSE request. 

• The dataset must be loaded by a dataset name call rather than by 
the LDR control statement. 

• The dataset cannot be dumped via PDSDUMP for archiving purposes. 

Because execute-only is a dataset state rather than a permission mode, it 
is advisable to set, at minimum, a maintenance permission control word to 
disallow modification or deletion of the dataset. 



LOCAL DATASETS 

A dataset to which a job has access is a local dataset* A local dataset 
can be temporary or permanent. Permanent datasets are made local with 
the ACCESS control statement or the ACCESS library subroutine (described 
in the Library Reference Manual, CRI publication SR-0014) . If the 
dataset referenced is a tape dataset, the device resource must also be 
specified on the JOB control statement (see section 7 of this manual) . 



DATASET DISPOSITION CODES 

Each dataset is assigned a disposition code telling the operating system 
the disposition to be made of the dataset when the job is terminated or 
the dataset is released. The disposition code is one of the parameters 
of the DISPOSE and ASSIGN control statements (see section 8 of this 
manual) . 

Each disposition code is a 2-character alphabetic code describing the 
destination medium of the dataset. The default disposition code for a 
dataset is SC (scratch) when a dataset is opened, unless the dataset 
named is one of a group of special names such as $PLOT, $PUNCH, and 
$OUT. By default, COS assigns the disposition code PR (print) to $OUT 
when the dataset is created. No DISPOSE statement is required for $OUT; 
it is automatically routed back to the originating mainframe with a PR 
(print) disposition. 
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USER DATASET NAMING CONVENTIONS 

The user assigns a symbolic name to each user dataset. This name, the 
local dataset name, is one through seven characters, the first of which 
must be a through z (in either upper- or lowercase), $, @, or %; 
remaining characters may also be numeric. A permanent dataset name is 
less restrictive. A permanent dataset name may contain any printable 
character. The name must be enclosed in quotes if it contains a 
character other than upper or lowercase letters, digits, $, @, or %. Do 
not use characters with the octal codes 000 through 037 or 177 through 
377. These are unprintable characters. Refer to the ASCII character set 
in Appendix C for details. Certain language processors place further 
restrictions on dataset names. 

Most datasets defined by COS are assigned names of the form $dn. Since 
datasets whose names begin with a $ may receive special handling by the 
system, refrain from using this format when naming datasets. 



USER I/O INTERFACES 

When using logical I/O, the user is never directly concerned with the 
actual transfer of data between the devices and the system buffers. 
Figure 2-6 illustrates the relationship of different levels of user 
logical I/O interfaces and routines. In this figure, the request levels 
and routine calls are summarized without going into detail on the 
movement of data between the system buffers and user program areas. For 
details on logical I/O, see the Macros and Opdefs Reference Manual, CRI 
publication SR-0012. 

The highest level of user interface is FORTRAN I/O statements; the lowest 
level is in the form of specially formatted requests called Exchange 
Processor requests. 

FORTRAN statements fall into two categories: formatted/unformatted and 
buffered. The formatted/unformatted statements result in calls to 
library routines $RFI through $WUF. If the dataset is blocked, these 
routines call the logical record I/O routines. The logical record I/O 
routines perform blocking and deblocking. The logical record I/O 
routines communicate with COS through the Exchange Processor requests, 
F$RDC and F$WDC. 

If the dataset is unblocked, $RUA or $WUA calls the unblocked dataset 
routine $RLB or $WLB. These routines do no blocking or unblocking of 
data. The unblocked I/O routines communicate with the system through the 
F$RDC and F$WDC Exchange Processor calls. 
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Figure 2-6. Relationship of levels of user I/O 
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Buffered I/O takes a different path from formatted/unformatted I/O. 
These routines interface (through an F$BIO Exchange Processor request) to 
routines in COS that normally perform logical I/O for system tasks. 
These routines, called Task I/O or TIO, closely resemble the logical 
record I/O routines. TIO and the logical record I/O routines make 
similar requests of circular I/O routines in COS although the mechanism 
for making these requests is different. 

Circular I/O routines (CIO) are the focal point for all logical I/O 
generated by COS. CIO communicates its needs for physical I/O to the 
Disk Queue Manager or Tape Queue Manager. 

A FORTRAN buffered I/O request issued for an unblocked dataset results in 
the buffered I/O routines calling the unblocked dataset routines $RLB and 
$WLB, which then process these requests. These requests are processed 
the same as formatted/unformatted requests except that buffered I/O 
requests return control to the user after initiating I/O rather than 
waiting for completion of the I/O request. For a CAL buffered I/O 
request, $CBIO is called to route the request to either the blocked or 
unblocked I/O processing routines. 

Cray Assembly Language (CAL) I/O macros are described in the Macros and 
Opdefs Reference Manual, CRI publication SR-0012. Logical record I/O 
routines and FORTRAN I/O routines are described in the Library Reference 
Manual, CRI publication SR-0014. See the FORTRAN (CFT) Reference Manual, 
CRI publication SR-0009, for a description of FORTRAN statements. 
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COS JOB PROCESSING 



A job is a unit of work submitted to the Cray Computer System. It 
consists of one or more files of card images contained in a job deck 
dataset. Each job passes through several stages from job entry through 
job termination. 



JOB DECK STRUCTURE 

A job originates as a card deck (or its equivalent) at a front-end 
computer system. Card images in the job deck dataset are organized into 
one or more files. Figure 3-1 illustrates a typical job deck consisting 
of a control statement file, a source file, and a data file. (The 
physical card forms for end-of-file and end-of-data are defined by 
the front-end system.) 




Figure 3-1. Basic job deck 
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The first (or only) file of the job deck roust contain the job control 
language (JCL) control statements that specify the job processing 
requirements (JCL is described in section 4 of this manual) . Each job 
begins with a JOB statement, identifying the job to the system. If 
accounting is mandatory in the user's system, the ACCOUNT statement must 
immediately follow the JOB statement. All other control statements 
follow the JOB statement. Control statements can also be grouped into 
control statement blocks as decribed in section 16 of this manual. The 
end of the control statement file is designated by an end-of-file record 
(or an end-of-data record if the job consists of a control statement file 
only) . 

Files following the control statement file can contain source code or 
data. These files are handled according to instructions given in the 
control statement file. 

The final card in a job deck must be an end-of-data. 



GENERAL DESCRIPTION OF JOB FLOW 

A job passes through the following stages from the time it is read by the 
front-end computer system until it completes: 

• Entry 

• Initiation 

• Advancement 

• Termination 



JOB ENTRY 

A job can enter the system in the form of a dataset submitted from a 
front-end computer system or a local or remote job entry station. The 
job is transferred to Cray Computer System mass storage, where it resides 
until it is scheduled to begin processing. The job input dataset is made 
permanent until it is deleted at the completion of the job. 



JOB INITIATION 

The operating system examines the parameters on the JOB control statement 
to determine the resources needed. When system resources required for 
initiation are available, the job is initiated (scheduled to begin 
processing) • 
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Initiation of a job includes preparing a Job Table Area (JTA) and user 
field, positioning the input dataset for the first job step, and placing 
the job in a waiting queue for the CPU. 

When COS schedules the job for processing, it creates four datasets: 
$CS, $IN, $OUT, and $LOG. 

$CS is a copy of the job's control statement file from $IN and is used 
only by the system; the user cannot access $CS by name. This dataset is 
used to read job control statements. The disposition code for $CS is SC 
(scratch) . 

$IN is the job input dataset. The job itself can access the input 
dataset, with read-only permission, by its local name, $IN, or as FORTRAN 
unit 5. 

$OUT is the job output dataset. The job can access this dataset by name 
or as FORTRAN unit 6. The disposition code for $OUT is PR (print) . 

The job's logfile ($LOG) contains a history of the job. This dataset is 
known only to the operating system and is not accessible to the user. 
User messages can be added to the job's logfile with the MESSAGE system 
action request macro (see the Macros and Opdefs Reference Manual, CRI 
publication SR-0012) or the REMARK, REMARK2, or REMARKF subroutines (see 
the Library Reference Manual, CRI publication SR-0014) . 



JOB ADVANCEMENT 

Job advancement is the processing of a job according to the instructions 
in a control statement file. Advancement occurs as a normal advance or 
as an abort advance. 

A normal advance causes COS to interpret the next control statement in 
the job's control statement file. When a job step is multitasked, a job 
advance deletes all user tasks except the one that causes the advance. 

An abort advance occurs if the operating system detects an error or if 
the user requests that the job abort. Abort advances are described fully 
under Exit Processing later in this section. 



JOB TERMINATION 

Output from a job is placed on system mass storage. At completion of a 
job, the operating system appends $LOG to $OUT and returns $OUT to its 
originating station. $IN, $CS, and $LOG are released. $OUT is renamed 
jn (from the JN parameter value of the JOB control statement described 
in section 7 of this manual) and is directed to the output queue for 
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staging to the specified front-end computer system. When the front end 
has received the entire contents of $OUT, the output dataset is deleted 
from COS mass storage. 

The front-end computer processes $OUT as specified by the dataset 
disposition code. If, for any reason, $OUT does not exist, $LOG is the 
only output returned at job termination. 

If EXP encounters an error as it attempts to copy $LOG to $OUT, $LOG is 
disposed on a separate file. 



JOB MEMORY MANAGEMENT 

Central Memory is a resource that is allocated to jobs by the operating 
system. A job's memory is composed of several distinct areas. Some of 
these areas are managed exclusively by the system for the user; others 
are managed by both the system and the user. 

Figure 3-2 illustrates a job in memory. The total job size equals the 
length of the job's Job Table Area (JTA) plus user field length. The 
lined area between JCHLM and JCLFT is unused space within the job. This 
area contains enough memory to guarantee that the job size is always a 
multiple of 512 words. 



INITIAL MEMORY ALLOCATION 

When the job initiates it is given sufficient memory for the Control 
Statement Processor (CSP) to execute. Once the JOB statement is 
processed, the job is allowed a field length no larger than the amount 
specified by the MFL parameter on the JOB control statement (see section 
7 of this manual) . 



MODES OF FIELD LENGTH REDUCTION 

There are two modes of field length reduction: automatic and user 
managed. 

• Automatic field length reduction mode. When the job is in 

automatic field length reduction mode, the system automatically 
increases and decreases the job's field length as the areas within 
the job increase and decrease. A job initiates in automatic field 
length reduction mode. 
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User-managed field length reduction mode. When the job is in 
user-managed field length reduction mode, the system continues to 
increase the job's field length as before, but never automatically 
decreases it. The job's field length can be decreased only by the 
user until the job is returned to automatic field length reduction 
mode. 



//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 
/////////////////// Job Table Area /////////////////// 
//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 
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//////////////////////////////////////////////////////// 
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/ //////////////////////////////////////////// / ////////// 
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Figure 3-2. User area of memory for a job 



t Although the heap follows blank common in the figure, it can 
optionally precede blank common. 
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The field length can be reduced at the beginning of each job step and 
during each job step if the job is in automatic field length reduction 
mode and any area of the job decreases. Since increases in field length 
can result in the job's requiring more memory than can be immediately 
supplied, which causes the job to be delayed until sufficient memory can 
be given to it, the user may want to manage the job's field length when 
it is known that the job will undergo frequent short-lived fluctuations 
in size. 



USER MANAGEMENT OF MEMORY 

A user can dynamically manage the user code/data area of the job by 
requesting an increase or decrease of memory at the end of the user 
code/data area. 

A user can manage the field length of the job by requesting a specific 
field length. 

When the user manages the field length of the job, the job is placed in 
user-managed field length reduction mode for the duration of the job step 
(next job step when using the MEMORY control statement described in 
section 9 of this manual) . 

A user can place the job in user-managed field length reduction mode 
across job steps by explicitly requesting that mode. The job remains in 
user-managed field length reduction mode until the user explicitly 
requests automatic field length reduction mode. 



Management by control statement from the run stream 

A user can use the MEMORY control statement to manage the job's field 
length. When the user manages the job's field length, the job will be 
placed in user-managed field length reduction mode for the duration of 
the next job step. The MEMORY control statement may also place the job 
in user-managed field length reduction mode across job steps or return 
the job to automatic mode. 



Management from within a program 

From within a program, use of the MEMORY macro or MEMORY routine, 
respectively, requests user management of the job's user code/data area 
and field length. When the user manages the job's field length, the job 
is placed in user-managed field length reduction mode for the duration of 
the job step. The MEMORY macro or MEMORY routine may also place the job 
in user-managed field length reduction mode across job steps or return 
the job to automatic mode. 
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Management associated with a program 

Use of the BC, PAD, and NORED parameters on the LDR control statement 
(see section 14 of this manual) causes certain memory management to be 
associated with the binary being loaded. This association is stored with 
the binary if the binary is saved on a dataset. The management 
associated can be user code/data area management or field length 
management and occurs when the binary is loaded for execution. If the 
field length is being managed, the job is placed in user-managed field 
length reduction mode for the duration of program execution. 



SYSTEM MANAGEMENT OF MEMORY 

The system changes appropriate areas of the job's memory when a job 
initiates certain system actions (that is, advances to the next job step, 
does I/O, etc.). The Job Table Area, Logical Pile Tables, and Dataset 
Parameter Area pictured in figure 3-2 can increase, but will never 
decrease. The user code/data and buffer areas may both increase and 
decrease in size. If the job is in automatic field length reduction 
mode, the system automatically increases and decreases the job's field 
length when any area in the job increases or decreases. If the job is in 
user-managed field length reduction mode, the system continues to 
increase the field length when it needs to, but never automatically 
decreases the field length. 



JOB RERUN 

Under certain circumstances, restarting of a job from its beginning may 
become necessary or desirable. This is referred to as rerunning a job. 
Conditions causing the system to attempt to rerun a job are: 

• Operator command, 

• Uncorrectable memory error, 

• Uncorrectable error reading the mass storage image of a job, and 

• System restart. 

A user job may perform certain functions that normally make its rerunning 
impossible. The functions render a job nonrerunnable because they 
produce results that might cause the job to run differently if it were 
rerun. These functions include: 
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• Writing to a permanent dataset 

• Saving, deleting, adjusting, or modifying a permanent dataset 

• Acquiring a dataset from a front-end system 

Ordinarily, when a job becomes nonrerunnable, it remains so. However, 
the user may declare that the job is rerunnable. The user should do this 
only when changes in job results due to execution of nonrerunnable 
functions are acceptable. COS never makes a job rerunnable automatically. 

The user can also override system monitoring of job rerunnability, 
regardless of what functions the job performs. This ordinarily is done 
only if the job is structured to run correctly regardless of whether 
nonrerunnable functions are performed. 



EXIT PROCESSING 

When an error condition is detected by COS or when the user requests a 
job step abort, COS checks to see if the condition is to be reprieved 
(Reprieve Processing is described in the next subsection) . If no 
reprieve occurs, exit processing occurs. Generally, when a job step 
abort occurs, the current job step is immediately abandoned and control 
statements are skipped until the next eligible EXIT statement is 
encountered (EXIT is described in section 7) . Normal job advancement 
occurs with the EXIT statement that is found. If no eligible EXIT 
statement is found, the job is terminated. 

EXIT statements that are within control statement blocks (iterative, 
conditional, or in-line procedure) that have not yet been invoked are 
ignored during the search for the next eligible EXIT statement. 

If the block currently being processed is a conditional block (see 
section 16) , only the group of control statements preceding the next 
conditional statement in the block is searched for an eligible EXIT 
statement; if none is found, the search continues with the first 
statement following the conditional block. For example, in the following 
sample control statement sequence, an abort advance occurs at the control 
statement THIS IS A JOB STEP ABORT CONDITION because it does not begin 
with a valid verb. Control statement interpretation resumes with the 
control statement: *. RESUME HERE. The EXIT statements that are 
included in the conditional block are ignored because they reside in 
blocks that are not executed. 
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SET,J1=0. 
IF(Jl.EQ.O) 



THIS IS A JOB STEP ABORT CONDITION. 
ELSEIF (Jl.EQ.l) 



EXIT. 
ELSE. 

EXIT. 
ENDIF. 



EXIT. 

*. RESUME HERE 



Exit processing is not performed for interactive jobs except inside an 
invoked procedure. After a job step abort occurs, the user is simply 
prompted for the next control statement. 



REPRIEVE PROCESSING 

Normally, when a job step abort error occurs, exit processing begins (see 
the previous section for a full description of exit processing) . 
Reprieve processing, however, allows a user program to attempt recovery 
from many of the job step abort errors or to perform clean-up functions 
before continuing with the abort. 

Reprieve processing can also be used during the normal termination of a 
job step. In this case, control transfers to the user's reprieve code 
instead of to the next normal job step. 

Two types of error conditions are related to a job step: nonfatal and 
fatal. 

• Nonfatal error conditions are those which can be reprieved any 
number of times per job step by the user. 

• Fatal error conditions can be reprieved only once for each type 
per job step. 
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See Appendix D for a listing of all fatal and nonfatal error conditions. 

When requesting reprieve processing, the user selects the error 
conditions to be reprieved by setting a mask in the SETRPV subroutine or 
macro call. If a selected error condition occurs during job processing, 
the user's current job step maintains control. The user's exchange 
package, vector mask register, error code, and error class are saved and 
control passes to the user's reprieve code. 



INTERACTIVE JOB PROCESSING 

An interactive job dataset has interleaved control statements, program 
or utility input, and program or utility output. In an interactive job, 
the control statement file ($CS) , standard input dataset ($IN) , standard 
output dataset ($OUT) , and logf ile ($LOG) are all defined by the system 
to be interactive datasets. See section 2 for more information on 
interactive datasets. 

Each job step of an interactive job is initiated with a control 
statement. Control statements can be either part of a procedure 
invocation or entered directly from the interactive terminal. After 
each control statement is received by COS, input to the job step can be 
entered from the terminal and output and logfile information is returned 
to the terminal. When the current job step is complete, normal job 
advancement occurs and COS prompts for the next control statement (or 
reads it from the invoked procedure file) . Exit processing (see section 
3) is never performed on an interactive job except within a procedure 
invocation. 

Whenever a program or utility executing as part of an interactive job 
requests to read from the standard input dataset, the interactive user 
is prompted to enter data one record at a time. Likewise any data 
written to $OUT, the standard output dataset, is sent to the interactive 
terminal. User logfile messages are also sent to the interactive 
terminal. 



JOB LOGFILE AND ACCOUNTING INFORMATION 

For each job run, the system produces a logfile — an abbreviated history 
of the progress of the job through the system. The logfile for a job 
appears at the end of the job output. Each job control statement is 
listed sequentially, followed by any messages associated with the job 
step. Clock time, accumulated CPU time, and COS information are also 
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given for each job step. A logfile usually consists of the items 
illustrated in figure 3-3. Item 6 illustrates the accounting information 
given to the user. 
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14:57:07 
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14:57:08 
14:57:08 
14:57:08 
14:57:08 
14:57:08 
14:57:08 
14:57:08 
14:57:08 
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14:57:08 
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14:57:08 
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14:57:08 
14:57:08 
14:57:08 
14:57:08 
14:57:08 
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0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0000 
0.0001 
0.0001 
0.0001 
0.0001 
0.0010 
0.0017 
0.0017 
0.0017 
0.0022 
0.0024 
0.0029 
0.0040 
0.0043 
0.0043 
0.0043 
0.0043 
0.0044 
0.0044 
0.0044 
0.0046 
0.0046 
0.0047 
0.0047 
0.0047 
0.0047 
0.0048 
0.0048 
0.0048 
0.0048 
0.0048 
0.0048 
0.0048 
0.0049 
0.0049 
0049 
0049 
0049 
0049 
0049 
0049 
0.0049 
0.0049 
0.0049 



CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

EXP 

EXP 

EXP 

CSP 

USER 

CSP 

USER 

CSP 

PDM 

PDM 

CSP 

CSP 

CSP 

CSP 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 

USER 



03/07/83 - The current COS on SN27 is 03/03. This system was brought up 
/TT\ at 1000, 03/07. 

CRI - MENDOTA HEIGHTS, MINN. 03/23/83 
COS 1.12 ASSEMBLY DATE 03/03/83 



© 
© 



CRAY-1 SERIAL 27/4 



CRAY OPERATING SYSTEM 



JOB,JN=SAMPJOB,US=PROJECT2013,MFL=28000,T=1. 
ACCOUNT, AC=. 



© 



* GENERATE A PERMANENT DATASET 



© 



COPYF (0=PERMDS ) 

FT048 - COPY OF 9 RECORDS 

COPYF, 0=PERMDS. 

FT048 - COPY OF 72 RECORDS 

SAVE (DN=PERMDS, ID=P2013) 

PDO0O - PDN = PERMDS ID = P2013 

PD0OO - SAVE COMPLETE 

EXIT. 

END OF JOB 



1 FILES COMPLETED 



1 FILES COMPLETED 



1 US = PROJECT2013 



© 



JOB NAME - 

USER NUMBER - 

TIME EXECUTING IN CPU - 

TIME WAITING TO EXECUTE - 

TIME WAITING FOR I/O - 

TIME WAITING IN INPUT QUEUE - 

MEMORY * CPU TIME (MWDS*SEC) - 

MEMORY * I/O WAIT TIME (MWDS*SEC) ■ 

MINIMUM JOB SIZE (WORDS) - 

MAXIMUM JOB SIZE (WORDS) - 

MINIMUM FL (WORDS) - 

MAXIMUM FL (WORDS) - 

MINIMUM JTA (WORDS) - 

MAXIMUM JTA (WORDS) - 

DISK SECTORS MOVED - 

USER I/O REQUESTS - 

OPEN CALLS - 

CLOSE CALLS - 

MEMORY RESIDENT DATASETS - 

TEMPORARY DATASET SECTORS USED - 

PERMANENT DATASET SECTORS ACCESSED 

PERMANENT DATASET SECTORS SAVED - 

SECTORS RECEIVED FROM FRONT END - 

SECTORS QUEUED TO FRONT END - 



SAMPJOB 
PROJECT2013 
0000:00:00.0046 
0000:00:00.2999 
0000:00:01.6256 
0000:00:00.0624 
0.11527 
47.48925 
13312 
30208 
10240 
27136 
3072 
3072 
96 
18 
11 
9 


20 
1 





Figure 3-3. Example of a job logfile 



(T) First header line ; Installation-defined message, usually 
identifying the site and date the job was run. 



© 



2) Second header line ; Installation-defined message, usually 

identifying the operating system, its current revision level, and 
the date of the last revision. 
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® Columns ; The leftmost column identifies the wallclock time for 

each job step and the middle column identifies the accumulated CPU 
time for the job. The rightmost column identifies a system module 
or the user as the originator of the message. All times are in 
decimal. Entries commonly noted include the following: 

CSP Control Statement Processor 

PDM Permanent Dataset Manager 

EXP Exchange Processor 

ABORT Abort Message 

USER Program in user field 

(4) Control statements ; Control statements are listed in the logfile 
as they are processed unless requested otherwise with the ECHO 
statement described in section 6 of this manual. When the job 
terminates, the last control statement processed that may be echoed 
is the last control statement printed. Control statements are not 
listed if the JCL message class (see the ECHO control statement) is 
disabled. 

@ Logfile messages ; Any messages related to control statement 
processing are shown below the statement. 

\6) Accounting information ; When a job reaches completion, COS writes 
a summary of basic accounting data onto the logfile for the job. 
All times given are in hours, minutes, and seconds (to the nearest 
ten-thousandth of a second) . The following accounting information 
is provided (in decimal) ; 

• Job name and user number 

• CPU time used by the job and by each job task in a mult i tasked 
job step 

• Time waiting to execute, for the job and for each job task in 
a multitasked job step; includes time waiting for the CPU, 
memory, operator suspension, and recovery. 

• Time waiting for I/O, for the job and for each job task in a 
multitasked job step 

• Time waiting in input queue 

• Memory usage based on the execution and I/O wait time in million 
word-seconds 

• Minimum and maximum job size including Job Table Area (JTA) 
(words) 

• Minimum and maximum field length used (words) 
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• Minimum and maximum JTA used (words) 

• Number of 512-word disk blocks (sectors) moved 

• Number of user I/O requests made by the job 

• Open and close calls 

• Memory-resident datasets 

• Number of 512-word disk blocks (sectors) used for temporary 
datasets 

• Number of 512-word disk blocks (sectors) accessed and saved for 
permanent datasets 

• Number of 512-word disk blocks (sectors) received from and 
queued to the front end 

• Number of tape devices reserved; message issued only if magnetic 
tape datasets have been processed. 

• Number of tape volumes mounted; message issued only if magnetic 
tape datasets have been processed. 

• Amount of tape data moved, expressed as a multiple of 512 words; 
message issued only if magnetic tape datasets have been 
processed. Each disk sector consists of 512 words, and in COS 
blocked format each block consists of 512 words. 

• Number of tape blocks moved; message issued only if magnetic 
tape datasets have been processed. 

(V) System Bulletin : The system bulletin allows the installation to 
print messages in the logfile, usually about the status of the 
system environment. It is an installation-maintained message 
dataset. 



SR-0011 3-13 M 



JOB CONTROL LANGUAGE 



The job control language of the Cray Operating System (COS) allows the 
user to present a job to the Cray Computer System, define and control 
execution of programs, and manipulate datasets. 

The job control language is composed of control statements with each 
control statement containing information for a job step. COS initially 
creates a control statement dataset, $CS, to hold job control 
statements. Additional control statement datasets can be created through 
procedure definition or the CALL control statement (see section 6) . 

The syntax of a control statement is: 



verb 


sep ± 


param^ 


sep 2 


param 2 


... 


sep n 


param n 


term 


comments 



All control statements must adhere to a set of general syntax rules. 
Every control statement consists of a verb and a terminator (term) as a 
minimum, except for the comment control statement (*) which does not 
require a terminator. Additionally, most control statements require 
parameters (param^) and separators (sep^) between the verb and the 
terminator. The maximum number of parameters (zero, one, or more) 
depends on the verb. 

The continuation separator (the caret symbol) allows a control statement 
to consist of more than one line image (80 characters) . The JOB, 
ACCOUNT, DUMP JOB, EXIT, and comment control statements cannot be 
continued. All other control statements can have any number of 
continuation card images, subject to restriction by the verb. A caret 
occurring within a literal string has no special significance. 

A comment is an optional annotation to a control statement and can be a 
string of any ASCII graphic characters. The comment follows the line 
image terminator. The control statement interpreter ignores comments. 
All comments appear in the logfile unless suppressed by the ECHO control 
statement. 



Blanks are ignored unless they are embedded in a literal string, 
cannot precede the verb on the JOB control statement. 



Blanks 
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SYNTAX VIOLATIONS 

COS notes syntax violations in the system and user logfiles. If the JOB 
control statement is in error, processing of the job terminates 
immediately. If accounting is mandatory, ACCOUNT statement errors also 
cause job termination. All other syntax errors cause a job step abort 
condition, which causes the system to search for an EXIT control 
statement. A successful search resumes control statement processing with 
the job step following EXIT. If no such job step exists or if an EXIT 
statement is not found, the job is terminated. Job step abort can also 
direct control to a user-specified routine (see exit processing and 
reprieve processing in section 3) • 



VERBS 

A control statement verb is the first nonblank field of a control 
statement specifying the action to be taken by COS during control 
statement processing. COS recognizes three types of control statement 
verbs: system verbs , dataset name verbs (local and system), and 
library-defined verbs. A control statement verb cannot be continued 
across a card boundary. 

When COS encounters a verb in a control statement file, it searches for a 
match to that verb in the following order: 

1. System verbs 

2. Local dataset name verbs 

3. Library-defined verbs 

4. System dataset name verbs 

COS first searches the list of system verbs for a match. If the verb is 
not a system verb, COS searches for a local dataset name that might match 
the verb. If the verb is not the name of a local dataset, COS searches 
each library in the library searchlist for a match. If it does not find 
a library entry that matches the verb, it searches the System Directory 
Table (SDR) for a matching system dataset name. If a match for the verb 
is not found under any of these categories, COS issues a control 
statement error and aborts the job step. 
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SYSTEM VERBS 

A system verb consists of an alphabetic character which can be followed by 
one through seven alphanumeric characters. The verb requests that 
COS perform the indicated function. The system verbs are: 



* 


DISPOSE 


EXIT 


LIBRARY 


PERMIT 


ROLLJOB 


ACCESS 


ECHO 


EXITIF 


LOOP 


PRINT 


SAVE 


ACQUIRE 


ELSE 


EXITLOOP 


MEMORY 


PROC 


SET 


ADJUST 


ELSEIF 


FETCH 


MODE 


RELEASE 


SIMABORT 


ASSIGN 


ENDIF 


IF 


MODIFY 


RERUN 


SUBMIT 


CALL 


ENDLOOP 


IOAREA 


NORERUN 


RETURN 


SWITCH 


DELETE 


ENDPROC 


JOB 


OPTION 


REWIND 





The SIMABORT control statement is described in the COS Simulator (CSIM) 
Reference Manual, publication SR-0073. 



LOCAL DATASET NAME VERBS 

A verb that is the name of a local dataset consists of an alphabetic 
character followed by one through six alphanumeric characters. This 
verb requests that COS load and execute an absolute binary program from 
the first record of the named dataset. If the user job has a dataset 
with the indicated name, COS loads and executes the program from that 
dataset. 



LIBRARY-DEFINED VERBS 

A library-defined verb consists of one through eight characters. The 
library-defined verb is either a program or procedure definition (see 
section 16 of this manual) residing in a library that is a part of the 
current library searehlist. (The library searchlist defines the 
library and the order in which the libraries are searched by COS. This 
order can be specified with the LIBRARY statement described in section 
7.) A program in a library is an absolute binary program to be loaded 
and executed. A procedure definition is a group of control statements 
and/or data to be processed (see section 16) . 



Alphabetic characters include $, %, @, and the letters A through Z. 
Alphanumeric characters include all the alphabetic characters and the 
digits through 9. 
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SYSTEM DATASET NAME VERBS 

COS searches for a verb that is the name of a system-defined dataset in 
the System Directory Table (SDR) . A system-defined dataset name verb 
consists of an alphabetic character which can be followed by one through 
six alphanumeric characters. The System Directory Table is a list of 
common language processors and utilities known to the system and made 
available to users at startup. The name of the program (for example, 
CAL, CFT, or DUMP) is also the name of the dataset containing the 
absolute binary of the program. The exact list of system dataset name 
verbs is site-dependent. 



SEPARATORS 

A separator is a character used as a delimiter in a control statement. 
It separates the verb from the first parameter, separates parameters from 
one another, delimits subparameters, terminates verbs and parameters, and 
separates a keyword from its value in parameters having keyword form. 

The control statement separators allowed by COS are given in table 4-1. 



PARAMETERS 

A parameter is a control statement argument, whose exact requirements 
are defined by the control statement verb. Parameters are used in 
control statements to specify information to be used by the verb-defined 
process. Parameters that can be used with COS control statements are 
either positional or keyword. For certain verbs, a parameter value can 
be an expression. Detailed information on the use of expressions is 
presented later in this section. Parameters are separated by commas. 



POSITIONAL PARAMETERS 

A positional parameter has a precise position relative to the separators 
in the control statement. Even a null positional parameter must be 
delimited from the control statement verb or other parameters by a 
separator. 



Alphabetic characters include $, %, @, and the 26 uppercase letters A 
through Z. Alphanumeric characters include all the alphabetic 
characters and the digits through 9. 
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Table 4-1. Control statement separators 



Function 


Character 


Examples 


Initial separator (comma or open 
parenthesis) - Separates the 
verb from the first parameter 


i 


VERB, parameter. 
VERB ( parameter) 


Statement terminator (period if 
initial separator is comma; close 
parenthesis if initial separator 
is open parenthesis) ' - Signifies 
end of control statement 


) 


VERB. 

VERB, parameter. 

VERBi parameter) 


Parameter separator (comma) - 
Indicates the end of one parameter 
and the beginning of the next 


i 


VERB (parameter, parameter) 


Equivalence separator (equal sign) - 
Delimits a parameter keyword from the 
first parameter value for that key- 
word. Adjacent equivalence separa- 
tors are illegal. 




VERB (keywords value) 


Concatenation separator (colon) - 
Separates multiple parameter values 
from each other 


: 


VERBikeyword-value-^'. value 2 ) 


Continuation character (caret) - 
Indicates that the control statement 
consists of more than one 80-character 
card; may appear anywhere after the 
initial separator 




VERBi . . . parameters. . . ~ 
parameters) 


Literal string delimiters 
(apostrophes) ** - Identify the 
beginning and end of a literal string 


i i 


VERBi keywords ' string' ) 


Parenthesis delimiters (open and close 
parentheses) - Indicate a group of 
characters to be treated as one value 


(...) 


VERBi keywords ( value-, value) 



ft 



By convention in this manual, the comma and period are used as 
initial and terminator separators for all control statements except 
or the JCL block control statements (procedure definition, iterative, 
and conditional) where paired parentheses are conventional. 
See section 16 for additional information on strings and string 
delimiters. 
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The formats for a positional parameter follow: 




Each vaiue^ is a string of alphanumeric characters, a literal string, 
or a null string. All positional parameters are required to be 
represented by at least one value, although the value can be null. 
Rules for strings are given in section 16. 



Examples of positional parameters: 



• • • , ABCDE , • • • 



. . . , Jr J. : ir £• : c i , . . . 
VERB() or VERB,. 



Parameter value is ABCDE. 

The adjacent parameter separators 
indicate a null positional parameter. 

The parameter consists of multiple values 

Positional parameter 1 is null 



KEYWORD PARAMETERS 

A keyword parameter is identified by its form rather than by its position 
in the control statement. The keyword is a string of one to eight 
alphanumeric characters uniquely identifying the parameter. Parameters 
of this type can occur in any order but must be placed after all of the 
positional parameters for the control statement, or they can be omitted. 



The formats of keyword parameters are: 



keyword 

k eyword=va lue 

keyword-value Rvalue 2 : . . . :value n 



keyword is an alphanumeric string that depends on the requirements of 
the verb, and value^ is the value associated with the keyword. A 
keyword parameter can occur anywhere in the control statement after all 
positional parameters are specified. Whether or not a keyword parameter 
is required depends on the verb's requirements. If the keyword is not 
included in the control statement, a default value can be assigned. 
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Examples of keyword parameters: 

. ..,DN=FILE1,. .. Parameter consists of keyword and value. 

. ..,UQ,... Parameter consists of keyword only. 

. . . ,DN=FILE1:FILE2:FILE3, . . . Parameter consists of keyword and list of 

values . 

. ..,DN=,... Null parameter value, as if omitted from 

the statement 

. . . , DN=A: : :B, ... A, B, and two null parameter values are 

listed. 

The parameter associated with a keyword may be defined as a secure 
parameter. Every secure parameter is edited out of the statement before 
it is echoed to the user logfile. When a keyword is secure, all that 
appears in the user's logfile is the keyword and the = sign, followed by 
the next delimiter. Secure parameters are defined when calling GETPARAM 
as described in the Library Reference Manual, CRI publication SR-0014. 



PARAMETER INTERPRETATION 

The decoding (cracking) of control statement parameters is normally 
performed by the routines $CCS and GETPARAM, as described in the Library 
Reference Manual, CRI publication SR-0014. Parameter interpretation is 
performed by the particular program or utility that calls $CCS or 
GETPARAM. 



CONVENTIONS 

The following conventions are used in this manual. 

Convention Description 

Italios Define generic terms representing the words or 

symbols to be supplied by the user 

[ ] Brackets Enclose optional portions of a command format 

{ } Braces Enclose alternate choices, one of which must be used 
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LIBRARIES 



Job control statements, programs, and compiled subprograms are maintained 
in libraries. The following types of libraries are available on the Cray 
Operating system: 

• Procedure libraries 

• Program libraries 

• Object code libraries 

The CALL and LIBRARY control statements (see section 7 of this manual) 
refer to procedure libraries; UPDATE (see the UPDATE Reference Manual, 
CRI publication SR-0013) maintains program libraries; BUILD (see section 
15 of this manual) maintains object code and procedure libraries. The 
LIB and NOLIB parameters of the LDR control statement (see section 14) 
refer to object code. 



PROCEDURE LIBRARY 

A procedure library is created by the in-line procedure definition 
process described in section 16 of this manual. After creation, 
procedure libraries are made available for use by the LIBRARY control 
statement (see section 7) . 

A procedure library is made up of procedures which are a sequence of 
control statements and/or data saved for processing at a later time. 
Procedures are described in section 16 of this manual. 



PROGRAM LIBRARY 

A program library is a means of maintaining programs and other data on 
datasets. These datasets are created and maintained by the UPDATE 
utility described in the UPDATE Reference Manual, CRI publication 
SR-0013. A program library (PL) consists of one or more specially 
formatted card image decks, each separated by an end-of-file record. 
These decks can be programs, portions of programs, input data for 
programs, or even job control statements. See the UPDATE Reference 
Manual for full information on using program libraries. 
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OBJECT CODE LIBRARIES 

Object code libraries are termed library datasets or simply libraries, A 
library dataset is a dataset containing a program file followed by a 
directory file. Library datasets are designed primarily to provide the 
Relocatable Loader (see section 14) with a means of rapidly locating and 
accessing program modules. Library datasets are created and maintained 
by the BUILD utility as described in section 15 of this manual. Any 
library dataset can be inspected and described by ITEMIZE. See section 
13 for more information on ITEMIZE. 
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JOB CONTROL STATEMENTS 



Job control statements perform the following functions: 

• Identify a job to the system 

• Define operating characteristics for the job 

• Manipulate datasets 

• Call for the loading and execution of user programs 

• Call COS programs that perform utility functions for the user 

• Define and manipulate other control statements 

The first file of a job dataset contains control statements that are 
read, interpreted, and processed one at a time. The sequential 
processing of control statements determines the job flow through the 
operating system. See section 3 for a general description of job flow. 
Sequential processing of control statements can be altered by exit or 
reprieve processing, or by control statement structures described in 
section 16. 

Information on the general syntax rules and conventions for control 
statements is presented in section 4. Sections 6 through 15 describe 
COS control statements and give example in some cases. The control 
statements are described in the following categories: 

• Job definition 

• Dataset definition and control 

• Permanent dataset management 

• Dataset staging control 

• Permanent dataset utilities 

• Local dataset utilities 

• Analytical aids 

• Executable program creation 

• Object library management 
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JOB DEFINITION 

Several control statements allow the user to specify job processing 
requirements. Control statements defining a job and its operating 
characteristics to the operating system include the following. 



Verb 
JOB 

MODE 
EXIT 



MEMORY 



SWITCH 



Function 

Introduces the job to the operating system and 
defines characteristics such as size, time limit, and 
priority levels 

Sets or clears mode bits in the job's Exchange Package 

Indicates the point in a series of control statements 
at which processing of control statements resumes 
following a job step abort from a program or 
indicates the end of control statement processing 

Requests a new field length and/or mode of field 
length reduction 



Turns on or turn off pseudo sense switches 

* Annotates control statements with comments 

RERUN, NORERUN Controls job rerunnability 

IOAREA, Denies or allows access to the job's I/O area, the 
upper (high -address) portion of user memory that 
contains tables and buffers managed by the system I/O 
library routines 

CALL, RETURN Allows the use of alternate control statement files 

ACCOUNT Validates the job's account number, user number, and 
optional passwords 



CHARGES 
ROLLJOB 
SET 

ECHO 



Obtains partial or total resource reporting for a job 

Protects a job by writing it to disk 

Changes the value of a job control language (JCL) 
symbolic variable 

Controls types of messages written to the job's 
logf ile 



SR-0011 



6-2 



M 



Verb 



LIBRARY 



Function 

Specifies the datasets to be searched, when looking 
for defined procedures, during job processing. 
LIBRARY also specifies the order in which to perform 
the search. 



OPTION 



Specifies user-defined options, such as the format of 
the job's listing and the amount of dataset 
accounting statistics produced 



Job definition and control statements are fully described in section 7. 



DATASET DEFINITION AND CONTROL 

Datasets can be defined and managed by the user with the following 
dataset control statements: ASSIGN, ACCESS, and RELEASE. 



Verb 



Function 



ASSIGN 



RELEASE 



Defines characteristics for datasets, such as the 
amount of user memory to allocate for the dataset' s 
I/O buffer. ASSIGN also can be used to create a mass 
storage dataset. ACCESS must first be used to create 
a tape dataset. 

Relinquishes access to the named dataset for the job 



ASSIGN and RELEASE are fully defined in section 8. ACCESS is described 
later in this section under Permanent Dataset Management because it is 
primarily used in managing permanent datasets. 



PERMANENT DATASET MANAGEMENT 

Control statements for managing permanent datasets provide for creating, 
protecting, and accessing datasets assigned permanently to mass storage 
or magnetic tape. Such datasets cannot be destroyed by normal system 
activity or engineering maintenance. 

Front-end computer systems cannot directly affect Cray-resident 
permanent datasets, since permanent dataset management is handled 
entirely by COS. However, permanent magnetic tape dataset management 
can optionally be coordinated with a front-end computer system. 
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Users can manage user permanent datasets only; system permanent datasets 
cannot be managed (modified or deleted) by the user. (See section 2 for 
a description of the types of datasets.) 

The control statements available for user permanent mass storage and 
magnetic tape dataset management are shown in table 6-1. Actual 
processing of these requests depends upon the medium on which the 
dataset resides. Mass storage datasets are controlled by the COS system 
task called the Permanent Dataset Manager (PDM) . Magnetic tape datasets 
are controlled by a system task called the Tape Queue Manager (TQM) . 
Both of these system tasks (PDM and TQM) have mechanisms for retaining 
the characteristic information about the dataset. Information for mass 
storage datasets is retained in the Central Memory-resident Dataset 
Catalog (DSC) . Magnetic tape datasets can have characteristic 
information retained on a front-end computer system. 

The permanent dataset management control statements are fully described 
in section 9. 



MASS STORAGE DATASET ATTRIBUTES 

Every mass storage permanent dataset has several attributes associated 
with it. These attributes are: 

• Read, write, and maintenance permission control words, 

• Public access mode, 

• Public access tracking, 

• Permits, 

• Text , and 

• Notes 

Permission control words 

A permission control word is a password that must be supplied to gain 
access to a particular permanent dataset. Permanent datasets are not 
required to have a permission control word, but if a permission control 
word is specified for the mode of dataset access desired (read, write, 
maintenance) , the control word must be specified to gain access to the 
named dataset. If more than one mode of access is desired (for example, 
both read and write) , all appropriate control words must be supplied. 
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Table 6-1. Permanent dataset management control statements 
for each medium 



Verb 


Mass storage 


Magnetic tape 


SAVE 


Enters a dataset' s 


Supplies to a front-end 




identification and location 


computer system the 




in a system-maintained 


characteristic information 




Dataset Catalog. Datasets 


about a dataset for its 




recorded in the Dataset 


retention 




Catalog via a user SAVE 






request are user permanent 






datasets and are recoverable 






at deadstart. 




ACCESS 


Assigns (makes local) a user 


Assigns an existing tape 




permanent dataset to the 


dataset to the job or 




requesting job, with the 


defines a NEW-type tape 




requested and/or allowable 


dataset that will be created 




modes (execute, read, 


by the job. Also optionally, 




write, maintenance) 


defines the front-end computer 
system that will be the 
central point for servicing 
that dataset. 


DELETE 


Removes the definition of 


Requests the front-end 




a user permanent dataset 


computer system servicing 




from the Dataset Catalog 


the dataset to remove 




(DSC) . It is possible 


(delete) any information 




to delete a dataset* s 


concerning the dataset 




contents and have its 






attributes retained by 






the system. 




MODIFY 


Changes the characteristic 
information for an existing 
user permanent dataset 


Not applicable 


ADJUST 


Records the change in any of 
the size or allocation 
information for a dataset 
that might have contracted 
or expanded 


Not applicable 


PERMIT 


Explicitly grants or denies 
specified users or groups 
of users access to a 
permanent dataset 


Not applicable 
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Public access mode attribute 

If all users are to be allowed some kind of access to a permanent 
dataset, that dataset must have a public access mode defined. The 
public access mode is the type of access, as a minimum, all users can 
have to the permanent dataset. Users can be allowed read, write, and/or 
maintenance mode access to the dataset. Users can be restricted to only 
executing the dataset; the public access mode can alternatively be NONE, 
signifying that public access is not permitted. 



Public access tracking attribute 

Public access tracking is a facility that can be turned on or off. A 
record can be kept of every user who accesses a public dataset. See 
Dataset Use Tracking later in this section for more details on the 
public access tracking mechanism. 



Permits attribute 

User permanent mass storage datasets can have a list of alternate users 
of the dataset and in what mode or modes each alternate user can access 
the dataset. Each element of the list is known as a permit and names 
a specific alternate user and that user's allowed mode of dataset 
access. Permits are described more fully under Access Mode later in 
this section. 



Text attribute 

text is a character string to be passed to a front-end computer system 
when requesting transfer of the dataset to or from Cray mass storage. 
Text is more fully described under Dataset Staging Control later in this 
section. 



Notes attribute 

notes is a string of up to 480 characters associated with a permanent 
dataset. There is no restriction on what notes contains. When 
notes is listed using the AUDIT utility (see Permanent Dataset 
Utilities later in this section) , the caret symbol is interpreted as an 
end-of-line signal and AUDIT advances to a new line when listing the 
dataset notes, notes can contain such information as dataset 
structure, usage instructions, or history. For example, if several 
versions of a program exist as different permanent datasets, the notes 
could identify the purpose, difference, and origin of each dataset. 
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ESTABLISHING ATTRIBUTES FOR MASS STORAGE DATASETS 

Mass storage permanent dataset attributes are established at dataset 
creation time, though they can be later modified (or added to in the 
case of permits) . Attribute establishment depends on whether a dataset 
with the same name (PDN) , additional identification (ID), and ownership 
already exists. 

Supplying the entire set of attributes every time a new permanent 
dataset is created, that is, when no permanent dataset with the same 
PDN, ID, and ownership currently exists, can become quite tedious, 
especially if a long list of permits must be established. Instead, the 
dataset creator can supply an attributes dataset. 



Existing permanent dataset 

If a permanent dataset with the requested PDN, ID, and ownership already 
exists, the current dataset* s permission control words, public access 
mode, public access tracking, and permit list are set to the 
corresponding attributes of the permanent dataset with the highest 
existing edition number (ED) and identical PDN, ID, and ownership. 

The text attribute is also copied from the highest existing edition 
unless otherwise specified; the notes attribute is not copied. 

The discussion of creating a new edition of an existing permanent 
dataset applies to datasets created by SAVE or PDSLOAD (see Permanent 
Dataset Utilities later in this section for information on PDSLOAD) . If 
MODIFY is used to create a new edition of an existing dataset (by 
changing the PDN or ID), any dataset attributes not explicitly modified 
remain unchanged. Thus, it is possible, though not recommended, for 
different permanent datasets with the same PDN, ID, and ownership to 
have different attributes. 



New permanent dataset 

Using SAVE or ACQUIRE when no permanent dataset currently exists with 
the same PDN, ID, and ownership causes a new permanent dataset to be 
created. 

All permanent dataset attributes can be established for a new permanent 
dataset; no attribute is associated with any other dataset. For 
example, if the new permanent dataset is to have a read permission 
control word, then the control word must be supplied. If a list of 
permits is needed, then the list must be supplied. Establishing an 
attributes dataset provides a convenient way of supplying a list of 
permits described in the following subsection. 
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Attributes dataset 

An attributes dataset is an existing permanent mass storage dataset 
from which any (or all) permanent dataset attributes can be copied. The 
actual dataset content is ignored; the attributes are copied from the 
dataset' s catalog entry. The attributes dataset can even be partially 
deleted (see Dataset Staging Control later in this section for a 
discussion of partial dataset deletion) . The attributes dataset must be 
local to the job referencing it. 

The attributes dataset is referenced with the ADN parameter on the SAVE 
or ACQUIRE control statement. When the attributes dataset is 
referenced, all desired attributes (such as permission control words and 
the public access mode) are copied from the attributes dataset and used 
in establishing the attributes of the current dataset. Any attribute 
explicitly specified on the SAVE or ACQUIRE control statement is used 
instead of the attributes dataset' s attribute. Examples of attribute 
dataset use are included at the end of section 9. 

An attributes dataset can also be used with the PERMIT control 
statement, although it is used slightly differently. When an attributes 
dataset is used with PERMIT, the entire permit list (but no other 
attribute) is copied from the attributes dataset and added to the permit 
list established (or being established) for the current dataset. 

For example, suppose the same permit list is being used for several 
different datasets. A single permanent dataset can be created and the 
list of permits established. Then whenever a new dataset is created, 
the original dataset can be accessed and used as an attributes dataset. 
The new dataset creator need not even know what permits are being 
established. 



PROTECTING AND ACCESSING MASS STORAGE DATASETS 

Access of mass storage datasets can be restricted on two levels: 

• Which users can access the dataset (privacy) 

• What type of access is allowed (access mode) 

The mass storage dataset protection system has two other dataset 
management aspects: 

• Dataset use tracking 

• Attribute association 
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Privacy 

Mass storage permanent datasets fall into three categories, depending on 
which users can access the permanent dataset. 

• Private datasets are accessible only to the dataset owner. 

• Semiprivate datasets are accessible to the dataset owner and to 
a specific group of other users. 

• Public datasets are accessible to all users. 

New mass storage datasets are either public or private (not semiprivate) 
by default. Contact your Cray Research site analyst for the default 
value at your site. A new dataset can be explicitly declared as either 
public or private with the PAM (public access mode) parameter on the 
SAVE control statement. (See section 9.) 



Access mode 

In addition to establishing which users may access a dataset, the owner 
must establish what mode of access alternate users are allowed; that is, 
whether users other than the dataset owner may execute, read, write, or 
maintain the permanent dataset. Specifying the mode of alternate access 
depends upon what category of user is being granted the access. The 
three categories of users are: 

• The dataset owner. The dataset owner is allowed all modes of 
access. 

• Specific alternate users. Specific alternate users are named 
with the USER parameter of the PERMIT control statement (see 
section 9); the alternate user's allowed mode of access is 
declared with the AM (access mode) parameter of the same PERMIT 
control statement. Multiple PERMIT statements can be issued for 
the same permanent dataset to provide a list of alternate users. 
PERMIT can also be used to change or remove the allowed mode of 
access for an alternate user of the dataset. The allowed access 
mode for a specific user is known as a permit. 

• All other users (the public) . All users of a dataset not in the 
two categories above can be allowed (or denied) access to the 
dataset by using the PAM (public access mode) parameter on the 
ACQUIRE (section 10) , SAVE, or MODIFY control statement (see 
section 9) . The mode of public access to a dataset can be 
changed at any time with the MODIFY control statement. 
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Any mass storage permanent dataset can have a public access mode with 
any combination of permits. If an alternate user desiring access to a 
permanent dataset is allowed both public access and is named in a 
permit, the alternate user is allowed the access named in the permit. 
The permit takes precedence over the public access mode. 

Such a combination of public and permitted access is often desirable. 
For example, suppose dataset FROG is to be used (executed as a program) 
by many groups of users, maintained by the dataset owner, and backed up 
or restored as needed by another user. Then, the dataset should have a 
public access mode of execute only and a permit of maintenance mode 
access for the alternate user who does dataset backup and restoration. 

Note that all users, including the owner, must correctly specify any 
existing permission control words corresponding to the mode of access 
desired. For example, suppose dataset BIG has a public access mode of 
READ and a read password of README. Any user desiring to read the 
dataset must supply the read password (README) to gain access to the 
dataset. An exception occurs if the permanent dataset utilities are 
used. For more information, refer to section 11. 



Dataset use tracking 

The total access count and date/time of last access are recorded for 
each dataset in the Dataset Catalog (DSC) . Access tracking capabilities 
include recording who accessed the dataset, how many times, and the 
date/time of last access. The permit mechanism described earlier in 
this section provides access tracking whenever a permit is issued for a 
user. A dataset that allows public access can also be tracked. 
However, the owner must explicitly state that public access tracking is 
required with the TA (track accesses) parameter on the ACQUIRE, SAVE, or 
MODIFY control statement; the system does not normally provide it. 



Attribute association 

The system allows permanent datasets having the same permanent dataset 
name (PDN) and additional identification (ID) to be distinguished by an 
edition number (ED). That is, there can be several datasets with 
different edition numbers that have the same PDN, ID, and ownership 
value. 

A user permanent dataset is uniquely identified by the PDN, ID, ED and 
ownership value. The ownership value recorded in the DSC when a 
dataset is made permanent is normally equal to the user number as 
specified on the ACCOUNT or JOB control statement. Specific 
installations can choose to define dataset ownership as the account 
number rather than the user number. Contact your Cray Research site 
analyst to find out which type of ownership value is used. 
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Permanent mass storage datasets with the same PDN, ID, and ownership are 
assumed to be closely related. Therefore, most permanent dataset 
attributes are the same for all editions of the permanent dataset. The 
read, write, and maintenance permission control words, public access 
mode, public access tracking, and permits are the same for all datasets 
with the same PDN, ID, and ownership. 

The text attribute is treated slightly differently. Any text supplied 
when the dataset is created is kept as a dataset attribute; if no text 
is supplied, the text attribute from the highest existing edition of the 
permanent dataset, if any, is used. 

The notes attribute is treated similarly to text except that notes are 
assumed to be different for each dataset edition, notes supplied at 
dataset creation time are used; if no notes are supplied, none are 
used. 

Deleting the data in a permanent dataset while leaving the dataset' s 
name and attributes recorded in the Dataset Catalog (DSC) is possible. 
Such a dataset is referred to as a partially deleted dataset. Partial 
dataset deletion is described under Dataset Staging Control. 



DATASET STAGING CONTROL 

Staging is the process of transferring jobs and data in the form of COS 
datasets from a front-end computer system to Cray mass storage or of 
transferring datasets from Cray mass storage to a front-end computer 
system. Three control statements support staging datasets between COS 
and a front-end system: ACQUIRE, FETCH, and DISPOSE. Another control 
statement, SUBMIT, directs datasets to the COS input queue. 

Verb Function 

ACQUIRE Checks to see if the requested dataset is currently 

permanent on mass storage. If the dataset is already 
permanent, ACQUIRE works exactly like ACCESS 
(described earlier in this section) and allows 
dataset access to the job making the request. 
Alternatively, if the dataset is not mass storage 
resident, ACQUIRE obtains a front-end resident 
dataset, stages it to Cray mass storage, and makes it 
permanent and accessible to the job making the 
request. The dataset is staged from the front-end 
only if it is not already permanent. 

DISPOSE Directs a dataset to the specified queue for staging 
to a front-end system. DISPOSE can also be used to 
release a local dataset or to change dataset 
disposition characteristics. 
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Verb . Function 

SUBMIT Directs a dataset on Cray mass storage local to the 
submitting job to the COS input queue 

FETCH Obtains a front-end resident dataset and makes it 
local to the requesting job 

The above control statements are fully described in section 10. 

DISPOSE is invalid with tape datasets because DISPOSE applies only to 
the staging of datasets from mass storage to a front-end computer system. 

Dataset control information such as save or access codes is usually 
required by a front-end system for management of its own files. Such 
control information can be sent by the Cray system user to the front-end 
system through the use of the text parameter (expressed as TEXT=text) , 
which is a special parameter of the SAVE, MODIFY, ACQUIRE, FETCH, and 
DISPOSE statements. The content of the character string provided with 
the TEXT parameter is defined by the front-end system (see the 
appropriate station reference manual for the use of the TEXT parameter 
at your front-end system) . 

The text information not only provides most of the directives for 
obtaining the dataset from the front-end computer system but can contain 
sensitive or secure information as well. When using the ACQUIRE control 
statement, the staged dataset is recorded in the Dataset Catalog (DSC) 
and thus made permanent. Like any other mass storage permanent dataset, 
the staged dataset 1 s attributes are recorded and protected as described 
under Protecting and Accessing Mass Storage Datasets, earlier in this 
section. 

The owner of an acquired dataset can provide permission to acquire the 
dataset to other users by specifying a public access mode or by issuing 
permits. The actual dataset (that is, the data) need not reside on mass 
storage for the permissions to be issued. For this reason the text, 
as specified by the owner when the dataset was initially acquired, is 
retained by the system as an attribute. The owner can, at a later date, 
delete the data while still retaining all of the permanent dataset 
attributes. A dataset registered in the DSC in this manner is referred 
to as a partially deleted dataset. 

When an authorized user acquires a partially deleted dataset, the text 
required to obtain the dataset from the front-end computer system is 
retrieved from the Dataset Catalog and sent along with the request. 
Therefore, the user need not specify the text in the ACQUIRE request. 
In fact, if the ACQUIRE is being issued by an alternate user as opposed 
to the owner, any text in the request is ignored. In this manner, the 
owner does not have to disclose the text information to other users. 
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The owner can at any time replace the text via the MODIFY command. 
After a partially deleted permanent dataset has been successfully 
acquired, the data is once again made permanent and is considered 
completely Cray mass storage resident. A subsequent ACQUIRE request, 
since the dataset is mass storage resident, is treated as an ACCESS 
request. Remember that the ACQUIRE request stages a dataset only if it 
is not already permanent on Cray mass storage. 



PERMANENT DATASET UTILITIES 

Three utilities (PDSDUMP, PDSLOAD, and AUDIT) can be used with any mass 
storage permanent datasets available to the user. Datasets processed by 
these utilities need not be local to the user job. The following 
utility routines are provided for mass storage permanent datasets. 

Verb Function 

PDSDUMP Dumps all specified permanent datasets to a 

user-specified dataset. Input and output datasets 
managed by the operating system can be included in 
the dump. 

PDSLOAD Loads permanent datasets that have been dumped by 
PDSDUMP and updates or regenerates the Dataset 
Catalog. Input and output datasets managed by the 
operating system can also be loaded with PDSLOAD. 

AUDIT Produces a report containing status information for 
each permanent dataset. AUDIT does not include 
system input or output datasets. 

The above control statements are fully described in section 11. 



LOCAL DATASET UTILITIES 

Utility control statements provide the user with a convenient means of 
copying, positioning, or initializing local datasets. The following 
utilities are available to the user. 

Verb Function 

COPYR, COPYF Copies blocked records, files, and datasets, 
COPYD respectively 

COPYU Copies unblocked datasets 
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Verb 



Function 



SKIPR, SKIPP Skips blocked records, files, and datasets, 



SKIPD 
REWIND 

WRITEDS 



respectively 

Positions a blocked or unblocked dataset at the 
beginning of data, that is, before the first word of 
the dataset 

Initializes a blocked random or sequential dataset. 
WRITEDS can also initialize a sequential dataset. 



The above control statements are described in section 12. 



ANALYTICAL AIDS 

The following control statements provide analytical aids to the 
programmer . 



Verb 



Function 



DUMPJOB 
DUMP 



DEBUG 



DSDUMP 



COMPARE 



DUMPJOB and DUMP are generally used together to 
examine the contents of registers and memory as they 
were at a specific time during job processing. 
DUMPJOB captures the information so that DUMP can 
later format selected parts of it. 

Produces a symbolic dump of the same data produced by 
DUMPJOB described above. DEBUG prints out the values 
of symbolic variables defined in the program being 
dumped . 

Dumps all or part of a blocked or unblocked dataset 
to another dataset in octal format 

Compares two blocked datasets and lists all 
differences 



FLODUMP 



Dumps flowtrace tables when a program aborts with 
flowtrace active 



PRINT 



SYSREF 



Writes the value of a JCL expression (as defined in 
section 16 of this manual) to the logfile 

Generates a global cross-reference listing for one or 
more CAL or APML programs 
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Verb Function 

ITEMIZE Inspects and generates statistics about library 

datasets. Libraries are described in section 5 of 
this manual; library dataset management is described 
under Object Library Management. 

The above control statements are fully described in section 13. 



EXECUTABLE PROGRAM CREATION 

The LDR control statement calls the COS Relocatable Loader into 
execution. This utility prepares programs for execution from 
relocatable modules. A series of relocatable modules is normally 
created when a program is compiled or assembled. Each relocatable 
module normally represents one subroutine of the whole program, or the 
main program itself. Each relocatable module (also known as a module, 
an object module, a relocatable, or a binary) consists of a series 
of tables. The tables contain such information as executable machine 
(program) instructions, references to other modules (such as when one 
subroutine calls another) , and the location of where the main program is 
to start execution. 

Before a collection of relocatable modules (the program) can be 
executed, the collection of modules must be linked together into a 
single module. This single module, the absolute load module, contains 
the main program and a copy of every subroutine called, including ones 
found in the various system libraries. An absolute load module can be 
executed any time without having to be reprocessed by the Relocatable 
Loader. The COS Relocatable Loader executes as a utility program within 
the user field and provides the loading and linking in memory of 
relocatable modules from datasets on mass storage. 

Very large programs might not fit in the available user memory space or 
might not use large portions of memory while other parts of the program 
are in execution. For such programs, the Relocatable Loader includes 
the ability to define and generate overlays — separate modules that the 
user creates and then calls and executes as necessary. 

Executable program creation is fully described in section 14. 



OBJECT LIBRARY MANAGEMENT 

BUILD, a utility called through the BUILD control statement, creates and 
maintains object libraries. 
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Compiled subroutines (relocatable modules) can be collected into 
libraries that can be referred to later when creating a new program. 
COS provides several standard object libraries (see the Library 
Reference Manual, CRI publication SR-0014, for a description of the 
standard library routines available) . 

Any number of object libraries can be created, however, in addition to 
the ones supplied with COS. 

Library datasets are designed primarily to provide the Relocatable 
Loader (see previous subsection) with a means of rapidly locating and 
accessing program modules. A library dataset is a dataset containing 
a program file followed by a directory file. The program file is 
composed of loader tables for one or more absolute or relocatable 
program modules. The directory file contains an entry for each program 
module . 

BUILD is fully described in section 15. 
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JOB DEFINITION AND CONTROL 



Several control statements allow the user to specify job processing 
requirements. This section contains the specifications for the following 
control statements used in defining a job and its operating 
characteristics to the operating system. 



JOB 

MODE 

EXIT 

MEMORY 

SWITCH 

* 

NORERUN 

RERUN 

IOAREA 

CALL 

RETURN 

ACCOUNT 

CHARGES 

ROLLJOB 

SET 

ECHO 

LIBRARY 

OPTION 



JOB - JOB IDENTIFICATION 

The JOB control statement defines the job to the operating system. It 
must be the first statement in a control statement file. The JOB control 
statement cannot be continued to subsequent lines or records. No leading 
blanks are allowed on the JOB statement. JOB is a system verb. 



Format: 



JOB , JN=jn , MFL=fl , T=t 1 , B=p , US=us , OLM=o Im , CL= jcn , gn=nr . 
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Parameters are in keyword form; the only required parameter is JN. 

JN=j>z Job name. 1 through 7 alphanumeric characters. This name 
identifies the job and its subsequent output. JN is a 
required parameter. 

MFL-fl Maximum field length (decimal) allowed the job, in words. 
The job's maximum field length is set to the greater of 
fl, rounded up to the nearest multiple of 512 words, or 
the amount needed to load the Control Statement Processor 
(CSP) . The job is aborted if the maximum field length is 
greater than the system maximum described below. 

If this parameter is omitted, the maximum field length is 
set by the system to a value determined by an installation 
parameter . 

If MFL is present without a value, the field length is the 
system maximum. The system maximum is the smaller of the 
total amount of memory available after the operating system 
is initialized minus the job's JTA size (see section 1) or 
an installation-defined maximum job field length. 

T=tl Time limit (decimal) in seconds after which the job is 

terminated by the system. If this parameter is omitted, 
the time limit is set to a value determined by an 
installation parameter. If T is present without a value, a 
maximum of 16,777,215 seconds (approximately 194 days) is 
allowed . 

P=p Priority level at which the job enters the system. This 
parameter can assume the values of through 15 decimal. 
If P is 0, the job is not initiated. If omitted, a value 
specified by the installation is assumed. 

US=us User number. 1 through 15 alphanumeric characters. The 
default is no user number. This parameter identifies the 
user submitting the job. Specific usage is installation 
defined . 

OIM=olm Maximum size of $0UT. olm specifies a decimal count of 

512-word blocks. A block holds about 45 print lines. The 
default and maximum values for olm are defined by the 
installation. 



The fl parameter on the JOB statement excludes the job's Job Table 
Area (JTA) ; space for the JTA is added by the system. 
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CL=jen Name of the installation-defined job class where this job is 
to be placed. 1 through 7 alphanumeric characters. The job 
is aborted if it does not fit the requirements of the 
indicated class or if the indicated class does not exist. 
The default is no class name. 

gn=nr Type and number of dedicated resources required by a job. 

gn is a generic resource name of 1 through 7 
alphanumeric characters. A generic resource name 
corresponds to a device type. For example, a generic name 
of SSD could be given to a Solid-state Storage Device. 
Generic names are defined by site administration. COS 
provides one generic name (*TAPE, which refers to a dual 
density tape unit capable of 1600 or 6250 bpi) , but sites 
may define up to 16 generic names. Contact your Cray 
Research site analyst for the generic names used at your 
site. 

nr is a positive integer and represents the maximum 
amount of the associated resource that may be used 
concurrently during job execution; the default is 0. A 
job is initiated only when the amount of each resource 
reserved is eligible for use. The job is aborted if it 
attempts to access more resources than are reserved with 
the JOB control statement. 

nr is the decimal number of units of the specified 
resource type. If gn refers to a tape device type, nr 
is the number of tape units to be used concurrently. If 
gn refers to a disk device type, nr is the decimal 
number of sectors required. 



MODE - SET OPERATING MODE 

The MODE control statement allows the user to set or clear mode flags in 
the Exchange Package for the job. MODE is a system verb. 



Format : 



MODE , Fl=option , BT=option , EMA=option , hVL=option , ORI-opt ion . 



Parameters are in keyword form. At least one parameter must be 
specified. The parameters are: 
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FI=option Floating-point interrupt mode. Option can be either: 

ENABLE Enable floating-point error interrupts; default. 
DISABLE Disable floating-point error interrupts; 
floating-point errors are ignored. 

BT=option Bidirectional transfer mode. The BT parameter is used 
on CRAY X-MP Series Computer Systems only, option can 
be either: 

ENABLE Enable bidirectional memory transfers; default. 
DISABLE Disable bidirectional memory transfers; block 

reads and writes are not performed concurrently. 

EMh=option 

Extended memory addressing mode. The EMA parameter is 
used on CRAY X-MP Series Computer Systems only; it 
causes an abort on CRAY-1 dystems. option can be either: 

ENABLE Enables extended memory addressing. 

DISABLE Disables extended memory addressing; default is 

an installation option, released as EMA=DISABLE. 

On the CRAY X-MP model 48, the default is released 

as EMA=ENABLE. 

AVL=option 

Second vector logical functional unit mode. The AVL 
parameter is used on CRAY X-MP Series Computer 
Systems only; it causes an abort on CRAY-1 systems. 
option can be either: 

ENABLE Makes available two logical functional units, 
the first of which shares reservation logic 
with the vector floating multiply unit. 

DISABLE Makes available only one vector logical unit. 
The vector multiply reservation path is not 
shared; default is an installation parameter, 
released as AVL=DISABLE. 

ORI= option 

Operand range error interrupt mode. The ORI parameter is 
used on CRAY X-MP Series Computer Systems only; option 
can be either: 

ENABLE Enables interrupts on operand range errors; 

default. 
DISABLE Disables interrupts on operand range errors. 



Not available on all CRAY X-MP systems. Check with a site analyst 
to determine if this feature is available. 
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EXIT - EXIT PROCESSING 

An EXIT control statement indicates the point in the control statement 
file where processing of control statements resumes following a job step 
abort from a program. If no job step abort occurs, the EXIT control 
statement indicates the end of the control statement processing. EXIT 
is a system verb. 



Format : 



EXIT. 



Parameters : None 



MEMORY - REQUEST MEMORY CHANGE 

The MEMORY control statement allows the user to request a new field 
length and/or mode of field length reduction. Job memory management is 
further discussed in section 3. 

MEMORY is a system verb. 



Format : 



MEMORY [,FL=fl] 


(user) 

(AUTO) 


• 



The keywords USER and AUTO are mutually exclusive. However, at least 
one of the following three parameters must be specified: 

FL=fl Field length, ft specifies the decimal number of words 

of field length to be allocated to the job. If FL is 
specified without a value, the new field length is set to 
the maximum allowed the job. 

USER Field length reduction is managed by the user (user mode) 

AUTO Field length reduction is managed by the system (automatic 
mode) 
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The job's field length can be changed by using the FL parameter. The 
field length is set to the larger of the requested amount rounded up to 
the nearest multiple of 512 words or the smallest multiple of 512 
decimal words large enough to contain the user code/data, LPT, DSP and 
buffer areas. Field length management is in user mode for the duration 
of the next job step. 

The management of a job's field length can be changed by using either 
the USER or AUTO parameters. When the USER parameter is specified, the 
job is placed in user mode until a subsequent request is made to return 
it to automatic mode. When the AUTO parameter is specified, the job is 
placed in automatic mode. 

The job step is aborted if completing the request results in a field 
length greater than the maximum allowed the job. The maximum is the 
smaller of the total number of words available to user jobs minus the 
job's JTA or the amount determined by the MFL parameter on the JOB 
statement. 



Examples : 

MEMORY, FL, USER. 

The job's field length is set to the maximum allowed the job and the 
job is placed in user mode until an explicit request is made to 
return it to automatic mode. 

MEMORY, AUTO. 

The job is returned to automatic mode. Its field length is reduced 
at the next job step. 

MEMORY, FL=28988. 

The field length is adjusted. If the job is in user mode by 
explicit user request, no change in mode occurs; otherwise, the job 
is placed in user mode for the duration of the next job step. 

MEMORY, FL=28988 , AUTO . 

The field length is adjusted and the job is placed in user mode for 
the duration of the next job step. After the next job step, the job 
is put in automatic mode. 
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SWITCH - SET OR CLEAR SENSE SWITCH 

The SWITCH control statement allows a user to turn on or turn off pseudo 
sense switches. SWITCH is a system verb. 



Format : 



SWITCH ,n=x. 



Parameters: 

n Number of switch (1 through 6) to be set or cleared 

x Switch position 

ON Switch n is turned on; set to 1. 
OFF Switch n is turned off; set to 0. 



* - COMMENT STATEMENT 

The comment control statement allows the user to annotate job control 
statements with comments. A terminator is not required on a comment 
control statement. * is a system verb. 



Format : 



* comment text 



Parameters: None 



NORERUN - CONTROL DETECTION OF NONRERUNNABLE FUNCTIONS 

The NORERUN control statement allows the user to specify whether the 
operating system is to recognize functions that would make a job 
rerunnable. The current rerunnability of the job is not affected. 
NORERUN is a system verb. 
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Format : 



NORERUN, / ENABLE l. 
(DISABLE) 



The keywords ENABLE and DISABLE are mutually exclusive. The default for 
the system as released is NORERUN, ENABLE; however, this is an 
installation option. 

Selecting ENABLE instructs the system to begin monitoring functions 
performed by the job and to declare the job nonrerunnable if any of the 
nonrerunnable functions are performed. 

Selecting DISABLE instructs the system to stop monitoring functions for 
nonrerunnable operations. If a job has already been declared to be 
nonrerunnable, specifying DISABLE does not make the job rerunnable again, 



RERUN - UNCONDITIONALLY SET JOB RERUNNABILITY 

The RERUN control statement allows the user to unconditionally declare a 
job to be either rerunnable or nonrerunnable. If RERUN is used to 
declare a job rerunnable, the subsequent execution of a nonrerunnable 
function may cause the system to declare the job nonrerunnable, 
depending on whether a NORERUN control statement or macro is also 
present. RERUN is a system verb. 



Format : 



RERUN, (ENABLE I . 
DISABLE! 



The keywords ENABLE and DISABLE are mutually exclusive. If no parameter 
is specified on the control statement, installation option determines if 
the job is to be rerunnable; the default for the system as released is 
RERUN, ENABLE. 

If ENABLE is selected, the system is instructed to consider the job to 
be rerunnable, regardless of what functions have been executed 
previously. 

If DISABLE is selected, the system marks the job not rerunnable 
regardless of what functions have been executed previously. 
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The RERUN control statement does not affect the monitoring of the user 
job for nonrerunnable functions. 



IOAREA - CONTROL USER'S ACCESS TO I/O AREA 

The IOAREA control statement locks (denies the user access to) or 
unlocks (gives the user access to) that portion of the user field 
containing the user's Dataset Parameter Area (DSP) and I/O buffers. 
This area follows the High Limit Memory address (HLM) of the user 
field. The user of the stack version of the COS libraries needs to 
note that IOAREA does not protect I/O buffers or DSPs that have been 
allocated within the user's stack space. IOAREA is a system verb. 



Format : 



IOAREA, | LOCK 

UNLOCK 



The keywords LOCK and UNLOCK are mutually exclusive. A parameter must 
be specified on the control statement. When the control statement is 
not used, the user's I/O area is assumed to be unlocked. 

If LOCK is selected, the system sets the limit address to the base of 
the DSPs, thereby denying direct access to the user's DSP area and I/O 
buffers. When the I/O area is locked, the library I/O routines make a 
system request to gain access to the I/O area. Although the system 
request introduces additional overhead in job processing, it should 
prevent accidental destruction of the I/O area. 

If UNLOCK is selected, the system sets the limit address to the value 
specified in JCFL, allowing access to the user's DSP area and I/O 
buffers. 



CALL - READ CONTROL STATEMENTS FROM ALTERNATE DATASET 

The CALL control statement instructs COS to begin reading control 
statements from the first file of the indicated dataset. CALL can 
appear anywhere in the control statement file. Nesting of CALL 
statements to seven levels is allowed. COS reads and processes the 
control statements from the indicated dataset until COS encounters an 
end-of-file or a RETURN statement. Control then reverts to the 
previous control statement dataset. 
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CALL does not rewind the specified dataset before reading it. 

The indicated dataset can contain either simple control statements or 
a procedure definition. Simple control statements are executed 
without any parameter substitution. On the other hand, parameter 
substitution is possible when the indicated dataset contains a 
procedure definition. The optional CNS parameter on the CALL 
statement allows COS to determine the form of control statements 
used. If CNS is not present, the statements on the indicated dataset 
are assumed to be simple control statements. In this case, they are 
executed exactly as read from the dataset, beginning with the first 
statement . 

However, if CNS is present on the CALL statement, the statements on 
the dataset are treated as a procedure definition. This means that 
parameter substitution can be performed before executing the 
statements. In this case, the first statement is assumed to be a 
prototype statement and subsequent statements are the procedure body 
definition. If the indicated dataset contains a procedure definition, 
the dataset will be closed after parameter substitution and before 
invocation of the procedure. 

If the dataset contains a procedure definition, the PROC and ENDPROC 
statements must not enclose the definition, unlike a procedure defined 
in-line within a control statement file. The PROC and ENDPROC 
statements may appear within the definition. Any statement enclosed 
by PROC and ENDPROC becomes a procedure definition which is included 
in the $PROC system procedure dataset when the enclosing procedure is 
invoked by a CALL statement. The enclosing procedure is not added to 
the $PROC dataset. 

When the CNS option is used and the procedure definition contains a 
nested PROC/ENDPROC sequence, the parameter substitution performed 
according to the prototype statement for the outermost procedure 
definition (the first statement of the dataset) is also performed on 
all nested definitions. This can produce warning messages if the 
inner definitions use keywords or positional parameters different from 
those specified for the outer definition. The nested definitions are 
written to $PROC with all matching substitutions performed and all 
nonmatching substitutions retained in the original form. 

CALL is a system verb. 



Format : 



CALL,DN=efa[,CNS]. 
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Parameters are in keyword form. 

Dl&=dn Name of dataset from which to begin reading control 

statements. This is a required parameter. 

CNS Crack next statement. This is an optional parameter. 

If present, the first statement on the dataset named by 
DN will be treated as the prototype statement for the 
procedure whose body is defined by the remaining 
statements in the first file of the dataset, and the 
next statement in the control statement dataset 
containing the CALL statement will be read by COS and 
treated as an invocation of the procedure. Parameters 
supplied on that statement are substituted according to 
the rules of parameter substitution described in section 
16 of this manual. 



Examples : 

1. Use of CALL without CNS: 

Assume that dataset X contains the following control statements: 

ACCESS , DN=A , PDN=B , UQ . 
DELETE, DN=A. 
RELEASE, DN=A. 

If dataset B has been previously saved, then the result of the 
statement : 

CALL,DN=X. 

would be: 

ACCESS , DN=A , PDN=B , UQ . 

PD000 - PDN = B ID « ED = 1 OWN = ABC 

PD001 - ACCESS COMPLETE 

DELETE, DN=A. 

PD000 - PDN ■ B ID = ED = 1 OWN = ABC 

PD001 - DELETE COMPLETE 

RELEASE, DN= A. 

2. Use of CALL with CNS: 

Assuming the contents for dataset X are the same as in example 1, 
the result of the statement: 

CALL, DN=X, CNS. 
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would be: 

ACCESS , DN=A , PDN=B , UQ . 

CS109 - POSITIONAL PARAM. AFTER KEYWORDS IN PROTOTYPE: UQ 

*,DN=A. 

CS122 - NO VALUE WAS ASSIGNED TO UQ 

AB025 - USER PROGRAM REQUESTED ABORT 

AB000 - JOB STEP ABORTED. P = 00000743b 

In this case the CNS parameter causes COS to consider the ACCESS 
statement to be a prototype statement; the DN, PDN and UQ 
keywords are assumed to be the identifiers of substitutable 
parameters. 

3. Valid CALL with CNS without nested definitions: 

Assuming that the contents of dataset X are: 

D,A,B. 

ACCESS , DN=&A , PDN=&B , UQ . 
DELETE, DN=&A. 
RELEASE, DN=& A. 

If the permanent dataset EXAMPLE exists, the result of the 
statements : 

CALL, DN=X, CNS. 
*,DS, EXAMPLE. 

would be: 

ACCESS , DN=DS , PDN=EXAMPLE , UQ . 

PD000 - PDN = EXAMPLE ID = ED = 1 OWN = ABC 

PD001 - ACCESS COMPLETE 

DELETE, DN=DS. 

PDOOO - PDN = EXAMPLE ID = ED = 1 OWN = ABC 

PD001 - DELETE COMPLETE 

RELEASE, DN=DS. 

4. CALL with a nested PROC/ENDPROC definition: 

Assuming that dataset X contains the following statements: 

D,A,B. 

PROC. 

A,Q,B. 

ACCESS , DN=&Q , ID=&B . 

ENDPROC. 

ACCESS , DN=& A , ID=&B , UQ . 

DELETE, DN=&A. 

RELEASE, DN=&A. 
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If permanent dataset Z with ID D exists, the result of the 
statements: 

CALL,DN=X,CNS. 
*,Z,D. 

would be: 

CS125 - NO SUCH FORMAL PARAMETER: Q 

<DEFINITION> PROC. 

<DEFINITION> A,Q,B. 

<DEFINITION> ACCESS , DN=&Q , ID=D . 

<DEFINITION> ENDPROC. 

ACCESS , DN= Z , ID=D , UQ . 

PD000 - PDN = Z ID = ED = 1 OWN = ABC 

PD001 ACCESS COMPLETE 

DELETE ,DN=Z. 

PD000 - PDN = Z ID = ED = 1 OWN = ABC 

PD001 - DELETE COMPLETE 

RELEASE, DN=Z. 

The $PROC dataset would contain a procedure with the definition: 

A,Q,B. 

ACCESS , DN=&Q , ID=D . 

The &B in the original definition was replaced by the value 
which was specified for the corresponding parameter B in the 
outermost procedure. The &Q was retained, since there was no 
corresponding replacement in the outermost procedure. 



RETURN - RETURN CONTROL TO CALLER 

The RETURN control statement returns control to the caller. The caller 
can be a procedure or the job's control statement file. Processing 
resumes with the caller's next control statement. A RETURN control 
statement can be embedded anywhere within the called procedure. However, 
a RETURN control statement need not be placed at the end of the procedure 
because an end-of-file record is interpreted as the control statement 
sequence of an EXIT, RETURN, and RETURN, ABORT. A RETURN encountered in 
the primary control statement file is ignored. RETURN is a system verb. 



Format : 



RETURN [, ABORT]. 
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Parameter : 



ABORT After returning to the previous control statement level, 
ABORT causes COS to issue a job step abort. ABORT is an 
optional parameter. 



ACCOUNT - VALIDATE USER NUMBER AND ACCOUNT 

The ACCOUNT control statement validates the job's user number, user 
password, account number, and account password. A job is processed only 
if the user number/password pair and the account number/password pair (if 
specified) are valid. The ACCOUNT control statement provides accounting 
data for the installation. Moreover, the installation and the individual 
users are also provided means for ensuring both privacy and security 
through the use of ACCOUNT parameters. 

The ACCOUNT statement declares the user's account and charge numbers to 
COS. It must immediately follow the JOB control statement if the 
installation has defined accounting or security as mandatory. Only one 
ACCOUNT statement is allowed per job. ACCOUNT is a system verb. 

If the job is interactive, and accounting is mandatory, the ACCOUNT 
statement must be the first statement entered in a session. If it is 
not, a prompt is issued to the terminal requesting the ACCOUNT 
statement. A similar prompt is issued for syntax errors made on the 
ACCOUNT statement. 



NOTE 

The ACCOUNT control statement parameters do not appear 
with the ACCOUNT control statement in the job logfile. 



Format : 



ACCOUNT , AC=ac , APW=apW , NAPW^apw , US=*MS , UPW=upW , NUPW=WWpW , 



Parameters are in keyword form. The only required parameter is AC; the 
installation defines whether one or more passwords are needed. 
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The installation generally sets up AC, APW, US, and UPW parameters. 
However, the user specifies NAPW and NUPW. Including a new account 
password provides the user accounting protection, since only the person 
who knows the NAPW can run a job under a given user's account number. 
NUPW is an additional security check available to the user. Therefore, 
NAPW and NUPW values should be known only to the individual user who 
specifies them. 

AC=ac Account number. 1 through 15 alphanumeric characters 

assigned to the user. This number identifies the user for 
accounting purposes, and is a required parameter. The 
account number is not the same as the user number on the 
JOB control statement, unless the site chooses to use the 
same characters for both numbers. 

APW=apw Account password. 1 through 15 alphanumeric characters or 
null. A password must be specified if the installation has 
made the password mandatory by installation parameter. To 
change a null account password to a non-null account 
password, a user must specify the keyword APW without a 
value and NAPW with the new value. 

NAPW=rzapw New account password. 1 through 15 alphanumeric 

characters or null. This new password replaces the old 
account password if the account number/password pair given 
by the AC and APW parameters is valid. NAPW may be 
specified without a value to change the account password to 
null. To change a null account password to a non-null 
account password, APW must be specified without a value and 
NAPW must be specified with the new value. 

US-us User number. 1 through 15 alphanumeric characters assigned 

to the user. This number identifies the user for system 
access purposes and is an optional parameter. The user 
number is not the same as the account number, unless the 
site chooses to use the same characters for both numbers. 
This parameter, if specified, overrides the user number on 
the JOB control statement. If US is not specified on the 
ACCOUNT control statement, the user number on the JOB 
statement is used by COS. 

UPW=wpw User password. 1 through 15 alphanumeric characters. A 
password must be specified if the installation has made 
security checking mandatory. 

NUPW=nwpw New user password. 1 through 15 alphanumeric characters. 
This new password replaces the old user password upo if 
the user number/password pair given by the US and UPW 
parameters is valid. 
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CHARGES - JOB STEP ACCOUNTING 

The CHARGES control statement allows the user to monitor a job's usage of 
computer resources up to a specific point in a job. Hence, CHARGES can 
be used for either partial or total resource reporting. 

Partial reporting occurs when parameters are specified on the control 
statement. In this case, usage statistics for the computer resources 
specified on the CHARGES statement are obtained for the job steps 
preceding the CHARGES statement. The summary is placed in the user log 
and the system log. 

Total reporting occurs when usage statistics are obtained for all the 
resources in all the available resource groups. The summary is placed in 
the user log and the system log. 

CHARGES is automatically invoked when a job terminates so that usage 
statistics of the entire job are reported. 



Format : 




Parameters are in keyword form. 
SR=options 



System resources used. Any one or more of the following 
groups of resources can be specified. Options are 
separated by colons. The default is a listing of the job's 
usage of resources in all of the following groups: 

JNU Job name and user number 

DS Permanent dataset space accessed, permanent dataset 
space saved, temporary dataset space used, 512-word 
disk blocks (sectors) moved, user I/O requests, 
memory-resident datasets used, number of OPEN calls 
and number of CLOSE calls 

WT Time waiting in the input queue before beginning 
execution 
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MM Minimum job size (words) , maximum job size (words) , 
execution-time memory usage in million word-seconds, 
I/O wait-time memory usage in million word-seconds, 
maximum field length used (words) , minimum field 
length used (words) , maximum JTA used (words) , and 
minimum JTA used (words) 

CPU Time executing in CPU, I/O waiting time, and time 

waiting for CPU. CPU gives the totals for the entire 
job. 

NBF Number of 512-word blocks (sectors) received from a 
front end and number of 512-word blocks (sectors) 
queued to a front end 

TASK Time executing in CPU, I/O wait time, and time 

waiting for CPU. The TASK option breaks down the 
time information according to user task number, and 
provides a total for the entire job. 

TPS Number of tape devices reserved, number of tape 
volumes mounted, amount of tape data moved 
(expressed as a multiple of 512 words) and number of 
physical tape blocks moved 

FSU Fast storage usage. Amount of SSD or BMR 

(Solid-state Storage Device or Buffer Memory) space 
reserved and used. 

The amounts are returned as two values; one is the 
wall-clock time times the reserved space usage 
amount and the other is CPU time multiplied by the 
reserved space usage amount for each device. Any of 
the four usage amounts, if nonzero, are placed in 
the user logfile. 



ROLLJOB - ROLL A USER JOB TO DISK 

The ROLLJOB control statement allows the user to protect a job by writing 
it to disk so that it can be recovered in case a system interruption 
occurs. ROLLJOB is a system verb. 



t Deferred implementation 
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Format : 



ROLLJOB. 



Parameters : None 



SET - CHANGE SYMBOL VALUE 

The SET control statement changes the value of a specified valid job 
control language symbol. Valid symbols are those classified as alterable 
by the user (U) in table 16-1. A job step abort occurs if a symbol 
included in a SET control statement is unknown to the system, can be set 
only by COS, or is a constant. SET is a system verb. 



Format : 



SET (symbol-expression) 



Parameters: 



symbol A valid user-alterable symbol; symbol is a required 
parameter. 

expression 

A valid arithmetic, logical, or literal assignment 
expression. It may be delimited with parentheses to 
simplify interpretation during control statement 
evaluation, expression is a required parameter. 



Examples : 

SET(J1=J1+1) 

This example increases the procedure-local register Jl by 1. 

SET(G1=(SYSID.AND.177777B) ) 

The global register Gl is given an ASCII value that is the low-order 
two characters from the current system revision level (COS X.XX) . 
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SET(G3=((ABTCODE.EQ.74) .AND. (G2.EQ.0) ) ) 

The global register G3 is assigned a value, depending upon the 
current values of ABTCODE and G2. 



ECHO - ENABLE OR SUPPRESS LOGFILE MESSAGES 

The ECHO control statement allows the user to control the message classes 
to be written to the user's logfile by turning the classes ON or OFF. 
ECHO may be used more than once during a job to toggle the printing or 
suppression of message classes. ECHO is a system verb. 



Format : 



Parameters are in keyword form. 

ON=cZass^ When a program or the operating system issues messages, 
they are written to the user's logfile in the classes 
specified. If any other classes were specified but not 
turned off by this statement, the union of the two sets of 
classes is enabled. If the ECHO control statement contains 
only the keyword ON or ON=ALL, all messages are written to 
the logfile. This is the default for the start of a job. 

OFF=c I ass i 

Messages in the classes specified are not written to the 
user's logfile. If any other classes were specified but not 
turned on by this statement, the union of the two sets of 
classes is suppressed. If the ECHO control statement 
contains only the keyword OFF or OFF=ALL, all messages in 
the defined classes are supressed. 

Messages that are not classified may not be turned off. 

The only classes that the operating system acknowledges are the following: 
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Class Description 

JCL Messages that originate in the user's JCL input file 

ABORT PiBxxx and system traceback messages that COS issues 
when a job fails 

PDMINP Dataset information messages produced by PDM 

PDMERR Error messages produced by PDM 

The keywords ON and OFF may be used in any combination. However, ensure 
that the classes specified do not overlap between the keywords, and that 
both defaults are not included. 

When a job calls a procedure, the echo state of the job is the same upon 
return from the procedure as before, even though the procedure may use a 
different echo state. The following occurs when ECHO is used with CALL 
and PROC: 

• The echo state of the caller (a job or another procedure) is saved 
so that on return to the caller the same state is in effect as 
before the call. 

• When the procedure includes an ECHO statement, the new echo state 
is in effect only for the duration of the procedure. If the 
procedure does not include an ECHO statement, the echo state of 
the caller is in effect. 



LIBRARY - LIST AND/OR CHANGE LIBRARY SEARCHLIST 

The LIBRARY control statement allows the user to specify the library 
datasets to be searched during the processing of control statement 
verbs. LIBRARY also allows the user to list the current or new 
searchlist to the logfile for verification. 

When modifying the searchlist, the current members of the searchlist can 
be retained in the new searchlist by including an asterisk in the LIBRARY 
control statement. The asterisk corresponds to all members of the 
current searchlist in their present order. If the asterisk is omitted, 
the new searchlist contains only the library dataset names identified on 
the LIBRARY control statement. LIBRARY is a system verb. 

The default library searchlist upon job initiation consists of the single 
library dataset $PROC. 
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Format : 



LIBRARY ,DU=dni:dn2» • . :driQ^,V, 



Parameters 
DH=dn j 



Library dataset names to become members of the new 
library searchlist. A maximum of 64 names (separated by 
colons) can be specified. The order in which they appear 
is the order they are searched. An asterisk included in 
the list signifies the current searchlist members are to be 
part of the new searchlist in their current order. 

List the current library searchlist on the logfile for 
verification. When specified along with the new 
searchlist, the new searchlist is listed. 



OPTION - SET USER-DEFINED OPTIONS 

The OPTION control statement allows the user to specify user-defined 
options, such as the format of the job's listing. OPTION is a system 
verb. 



Format : 



OPTION, [LPP=rc,] 




Parameters : 



LPP=n 



STAT=f 0N 
j OFF 



Number of lines per page; a decimal number from through 
255. If is specified, the current number of lines per 
page is not changed. The default is an installation 
parameter . 

STAT=ON has two effects. First, it enables accounting for 
any mass storage datasets created while STAT=ON is in 
effect; statistics are reported separately for each device 
containing all or part of such datasets. Second, it 
enables the printing of the dataset I/O statistics 
collected for all datasets to user $LOG at release time. 
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STAT generates a short- or long-form I/O statistic, 
depending on when the option is invoked. The short-form 
consists of the dataset name, device name, dataset size, 
number of user I/O requests, . number of 512-word blocks 
transferred, and total time blocked for I/O for the dataset, 

SY005 - $IN DD-A2-24 512W 1R IS .248SEC 

The long-form output line consists of the dataset name, 
device name, size in sectors, number of read requests, 
number of sectors read, number of write requests, number of 
sectors written, and time. 

SY005 - TEST DD-A1-32 IS ORR OSR 1WR 1SW . 05S 

No statistics are collected or printed if STAT=OPP, which 

is the default condition. However, datasets created while 
STAT=OFF, then released while STATION have the short- form 
output line printed out. 



Examples : 

1. ASSIGN,DN=X. 
OPTION, STAT=ON. 

COPYF, ,0=X. 

RELEASE, DN=X. 

Short- form I/O statistics are printed for X. 

2. OPTION, STATION. 
ASSIGN,DN=X. 

COPYF, ,0=X. 

RELEASE, DN=X. 

Long- form I/O statistics are printed for X. 

3 . OPTION , STATION . 
ASSIGN,DN=X. 

COPYF, ,0=X. 

OPTION, STAT=OFF. 
RELEASE, DN=X. 

No I/O statistics are printed for X, even though statistics were 
collected. 



SR-0011 7-22 M 



4. OPTION, STAT=ON. 
ASSIGN,DN=X. 
COPYF,....,0=X. 
OPTION, STAT=OFF. 
• • • 

OPTION, STATION. 
RELEASE, DN-X. 

Long-form I/O statistics are printed for X. 
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DATASET DEFINITION 8 

AND CONTROL 



Datasets are defined and managed by the user through three dataset 
control statements: ASSIGN, ACCESS, and RELEASE. ACCESS is not used for 
Integrated Support Processor (ISP) datasets. Instead, the ISP control 
statement gives a user job access to an ISP, and the CONNECT control 
statement accesses a specific dataset. Refer to the ISP General 
Information Manual, CRI publication SG-0094, for details . 

• ASSIGN defines characteristics for datasets. ASSIGN also can be 
used to create a mass storage dataset. 

• ACCESS (described in section 9) makes an existing disk or tape 
permanent dataset local to a job or can be used to create a 
dataset on magnetic tape. 

• RELEASE relinquishes access to the named dataset for the job. 



ASSIGN - ASSIGN DATASET CHARACTERISTICS 

The ASSIGN control statement creates a mass storage dataset and assigns 
dataset characteristics for tape and mass storage. If an ASSIGN is used 
for dataset creation, it must appear before the first reference to the 
dataset; otherwise, the characteristics are defined at the first 
reference. If an ASSIGN is used for a tape dataset, it must follow the 
tape ACCESS request. ASSIGN ff is a system verb. 



t Publication SG-0094 will be available when the ISP software is 

released. 
ft ASSIGN does not create a dataset that the CPT OPEN statement 

recognizes as existing unless the FILE parameter is on the OPEN 

statement. See CRI publication SR-0009, FORTRAN (CFT) Reference 

Manual . 
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Format: 



ASSIGN, DN=dn ,S=size r SZ=size ,liOF ,BS=b8z: bpt ,DV=ldv ,ur*dt ,DF=df , 





I 7 RDM r u r iw r w=lm r mc^ds,c r DC=dc r BFi=bfi r h=FTxx f FD=fd f cv=cv f 

/ / 



CS=CS , F-f,RF=rf, RS=z»s ,MBS=m&S . 



Parameters are in keyword form. The only required parameter is DN. 

DH=dn Local dataset name. 1 through 7 alphanumeric characters, 

the first of which is A through Z, $, %, or @; remaining 
characters may also be numeric. DN is a required parameter. 

S=size Dataset size. Octal number of sectors (512-word blocks) to 
be reserved for the dataset. If the dataset size is not 
given, the space for the dataset is dynamically allocated 
as needed. S and the SZ option are mutually exclusive. 
Furthermore, S applies to mass storage datasets only, and 
is ignored when used for magnetic tape datasets. 

SZ=size Dataset size. Decimal number of sectors (512-word blocks) 
to be reserved for the dataset. If the DV option specifies 
a generic resource or if Idv is a controlled device, SZ 
is the largest number of sectors associated with this 
dataset which can reside on the device. The mass storage 
space reservation occurs when the ASSIGN command is 
processed. If the SZ option is not specified, the space 
for the dataset is dynamically allocated as needed. S and 
the SZ option are mutually exclusive. SZ applies to mass 
storage datasets only and is ignored when used for magnetic 
tape datasets. 

Although the SZ option is specified as decimal sectors, 
disk space is allocated by COS in tracks which are larger 
than sectors. When an ASSIGN statement declares dataset 
size, COS rounds the sector count up to an integral 
multiple of track size and allocates that number of 
tracks. For example, when ASSIGN(.. .,S=1,...) is 
specified, COS allocates one track to the dataset, even 
though the request is for one sector. If the dataset 
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resides on a DD-19 or a DD-29, a track is equivalent to 18 
decimal sectors. Other disk devices can have different 
track sizes. 

When the disk device specified on the ASSIGN statement is a 
controlled device with a generic name, the total concurrent 
use of the device must be declared on the JOB statement as 
decimal sectors. If the space on the device is divided 
among several datasets with the SZ option on the ASSIGN 
statement, a rounding error may occur with each use of the 
SZ or S options. The result can be an unexpected GENERIC 
RESOURCE LIMIT EXCEEDED error or an unexpected device 
overflow. The SZ option can produce other results when it 
is used with the NOF parameter of ASSIGN. Those results 
are described under NOF in this section. 

If both INC and SZ are specified, SZ is used initially and 
INC is used subsequently. 

To divide space among several datasets on a generic 
resource such as Buffer Memory or Solid-state Disk, sector 
counts should be specified as multiples of track size. 
Track size is currently 18 decimal for all controlled 
devices. 

NOP No overflow. When NOF is indicated, the dataset does not 
span any more than the specified device. The SZ and NOF 
options on the ASSIGN statement produce the following: 

SZ and NOF specified: abort at MIN (Remaining Job 
Limit, SZ) 

SZ specified without NOF: overflow at MIN (Remaining 
Job Limit, SZ) 

NOF specified without SZ: abort at Remaining Job Limit 

Neither SZ nor NOF specified: overflow at Remaining Job 
Limit 

BS-bsz Buffer size and partitioning value. The value given to 

bsz specifies the size of a dataset' s circular I/O buffer 
in 512-word blocks. The default is the value defined by 
the installation parameter. The U and BS parameters are 
mutually exclusive. 
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BS=b8z:bpt f 

The value given bpt specifies the minimum size in 
512-word blocks for transfers to and from the circular 
buffer. This value must be less than or equal to the 
buffer size. The default transfer size is half a buffer. 

DV=ldv Logical device on which the dataset begins. If a logical 
device name is not given, one is chosen by the system. 
Idv can also be a generic resource name. Consult site 
operations for possible logical device names and generic 
resource names. This parameter applies to mass storage 
datasets only and is ignored when used for magnetic tape 
datasets. 

DT=dt Device type. The allowable device types are CRT 

(interactive) and MS (mass storage) . MS is the default. 
This parameter is ignored when used for magnetic tape 
datasets . 

DF=*2/ Dataset format. This parameter is used only on output; it 
is valid only when DT=CRT. This parameter is ignored when 
used for magnetic tape datasets. Two formats are supported: 

CB Character blocked. End-of -record RCWs are converted 
by the station to the format which the station 
supports. CB is the default. 

TR Transparent. End-of-record RCWs are not converted. 
The user is responsible for inserting cursor controls. 

RDM Random dataset. If the RDM parameter is present, the 

dataset is read and written randomly (that is, records may 
be read or written out of sequence) . If the RDM parameter 
is not specified, only sequential or FORTRAN direct access 
I/O is allowed on the datasets. This parameter applies to 
mass storage datasets only and is invalid for magnetic tape 
datasets. 

U Unblocked dataset structure. If the U parameter is 

present, the dataset is not in COS-defined blocked format. 
If the U parameter is absent, the dataset is a COS blocked 
dataset. (See section 2 for information on unblocked 
dataset format.) This parameter is invalid for interchange 
format tape datasets. The U and BS parameters are mutually 
exclusive . 



t Deferred implementation 
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MR Memory-resident dataset. If this parameter is present, the 
system I/O routines write the buffers to mass storage only 
if they become full. If the MR parameter is absent, the 
dataset is not a memory-resident dataset. MR generates an 
error if the U parameter is specified. This parameter 
applies to mass storage datasets only and is invalid for 
magnetic tape datasets. 

JM-lm Maximum size limit for this dataset. Im specifies a 

decimal count of 512-word blocks. The job step will be 
aborted if this size is exceeded. The default and maximum 
dataset size limits are set by an installation parameter. 
This parameter applies to mass storage datasets only and is 
ignored for magnetic tape datasets. 

INC=nds Number of decimal sectors to allocate each time allocation 
occurs. If both INC and SZ are specified, SZ is used 
initially and INC is used subsequently. 

C Contiguous space allocation. Use C to allocate contiguous 
space requested by the SZ or INC parameter or the default 
size. If C is not specified, the system tries to find 
contiguous space on the selected device only. If C is 
specified, the system searches on every eligible device. 

If contiguous space cannot be found when C has been 
specified, the return status SPACE NOT AVAILABLE appears. 

DC=de Disposition code. Disposition to be made of the dataset 

when it is released. This parameter applies to mass 
storage datasets only and is ignored for tape datasets. 
The default is SC. 

do is a 2-character alphabetic code describing the 
destination of the dataset as follows: 

IN The dataset is placed in the input queue of the 
destination station. 

ST Stage to mainframe. Dataset is made permanent at the 
mainframe of job origin. 

SC Scratch dataset. Dataset is deleted. 

PR Print dataset. Dataset is printed on printer at the 
mainframe of job origin. 

PU Punch dataset. Dataset is punched on any card punch 
available at the mainframe of job origin. 
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PT Plot dataset. Dataset is plotted on any available 
plotter at the mainframe of job origin. 

MT Magnetic tape. Dataset is written on magnetic tape 
at the mainframe of job origin. 

BFI=bfi Blank field initiation. Octal representation of ASCII code 
indicating the beginning of a sequence of blanks. BFIOFF 
means that blank compression is inhibited. The default 
code is 33g (ASCII ESC code) but can be changed by an 
installation parameter. BFI is ignored for ISP datasets. 

h=FTxx Unit name. Unit names allow the user to refer to a dataset 
from a FORTRAN program. Each unit name is 4 characters in 
the form FTawc, where xx is the unit number specified. 

The unit number is an integer value in the range through 
102. However, because unit numbers 100, 101, and 102 are 
reserved for system use, a user may designate unit numbers 
through 99. 

Use of this parameter associates the designated unit with 
the dataset specified by the DN parameter. At job 
initiation, unit FT05 is associated with dataset $IN and 
unit FT06 is associated with dataset $OUT. Unit names 
should not be used as dataset names. 



NOTE 

If a dataset name is used in place of a unit 
name or vice versa, FORTRAN * 77 auxiliary 
statements (that is, OPEN, CLOSE, and INQUIRE) 
produce unpredictable results. 



FD=fd Foreign dataset translation identifier, fd is a 3-character 

code which indicates that foreign dataset translation is to 
be performed on the dataset. This parameter is required 
for runtime translation. Valid values for fd are: 

IBM IBM-compatible sequential file 

CDC CDC-compatible sequential file 

The default is no translation. 
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CV=cv Foreign dataset conversion mode. CV indicates if implicit 

data conversion is to be done by the run-time library. CV 
values are: 

ON Data conversion turned on. ON causes the library to 
convert the foreign internal representation to or 
from Cray internal representation, according to the 
I/O list. 

OFF Data conversion turned off. The data type is not 
considered when OFF is specified. Full Cray words 
are moved to or from the foreign dataset. 

The default is no data conversion. 

CS=cs Foreign data character set. This parameter specifies the 

character set to represent the internal data on the foreign 
dataset. Run-time library routines convert character data 
from the es character set to ASCII when implicit data 
conversion is turned on. The valid cs values are: 

AS ASCII 

EB EBCDIC. EB is the default for IBM tape file 
translation. 

DC Control Data display code. This option is illegal 
when IBM tape file translation is requested. DC is 
also the default for CDC tape file translation. 

F=f Tape format. / is a 1- or 2-character code which 

describes a CDC tape format type. It is required for CDC 
tape file translation; no default value is provided for F. 
Valid F values are: 

I Internal tape format 

SI System or SCOPE internal tape format 

TXF-rf Record format, or block and record type. When defined for 

IBM tape files, RF refers to record format, vf is a 1- 
to 3-character code which describes an IBM record format. 
Valid values for RF when defining IBM tape files are: 

U Undefined-length records 

F Fixed-length records 

FB Fixed-length blocked records 

V Variable-length records 

VB Variable-length, blocked records 

VBS Variable-length, blocked, spanned records 

No default value is provided. 
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When defined for CDC tape files, RF refers to block and 
record type. In this case rf is a 2-character code which 
describes a CDC block and record type. The first of the 
2-character code describes the block type: 

I Internal block type 

C Character-count block type 

The second character of the 2-character code describes the 
record type: 

W Control-word record type 

Z Zero-byte record type 

S System-logical record type 

No default value is provided. RF is required for CDC tape 
file translation. The following rf values are supported 
for CDC tape files: 



RS=2»S 



IW Internal block type, control-word record type 

CW Character-count block type, control-word record type 

CZ Character-count block type, zero-byte record type 

CS Character-count block type, system-logical record type 

Tape dataset record size, rs is the decimal length of 
the record, and its expression varies for IBM and CDC tape 
files. 



When defined for IBM tape files, rs is the decimal length 
of the record in 8-bit bytes. The default is set according 
to the requested record format. Table 8-1 shows the 
defaults for which RS is set for IBM tape files. 



Table 8-1. RS defaults for IBM tape files 



Record format 


Default 


Undefined-length 


RS=MBS 


Fixed-length 


Fixed-length, blocked 


Var iable-length 


RS<MBS-4 


Variable-length, blocked 


Variable-length, blocked, spanned 
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In addition, restrictions are enforced on IBM tape files at 
ASSIGN processing time. Table 8-2 summarizes those 
restrictions. 



Table 8-2. RS restrictions for IBM tape files 



Record format 


Restriction 


Undefined-length 


RS=MBS 


Fixed-length 


Fixed-length, blocked 


RS is multiple 
of MBS 


Variable-length 


RS<MBS-4 


Variable-length, blocked 


Variable-length, blocked, spanned 


None 



For CDC tape files, rs is the decimal length of the 
record in 6-bit characters, rs refers to the maximum 
record length when W is specified as a value for RF. The 
default or RS=0 imply that there is no maximum record 
length. 

When Z is specified as a value for RF, rs becomes the CDC 
equivalent of the FL parameter: rs specifies the length 
to which zero-byte records are to be extended on input, and 
the length of a zero-byte record on output. This parameter 
is required for zero-byte record translation. No default 
value is provided for rs when Z is specified as an RF 
value. 

For CDC system-logical records, rs is the maximum record 
length. The default or RS=0 imply that there is no maximum 
record length. 



HBS=mbs Maximum tape block size. 
IBM and CDC tape files. 



mbs values are different for 



When defined for IBM tape files, nibs is the maximum block 
length in 8-bit bytes. The only mbs restriction for IBM 
tape files is that the value be less than or equal to 32760 
bytes . 
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When defined for CDC tape files, nibs is the maximum block 
length in 6-bit characters. The default is 0*5120 
characters. It is recommended that the user not override 
this default value. 



RELEASE - RELEASE DATASET 

The RELEASE control statement relinquishes access to the named datasets 
for the job. If a dataset is not permanent and its disposition code is 
SC (scratch) , the mass storage assigned to the dataset is released to the 
system. If the dataset is to be staged, the dataset is entered in the 
output queue for staging to the destination station. An end-of-data 
record is written to a permanent dataset and an ADJUST is performed when 
it is released if the dataset is blocked sequential and the previous 
operation was a write. 



Format : 



RELEASE, DH=dni :dn 2 : • • . :dn Q ,H0LD, 



Parameters: 

DH=dn^ Name of dataset to be released. A maximum of eight 
datasets may be specified. 

HOLD Hold generic resource. Do not return the resource 
allocation to the system pool. 
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INTEGRATED SUPPORT PROCESSOR (ISP) DATASETS 

ISP datasets are controlled by two types of COS control statements: 

• ISP - initiates communication with the ISP system on behalf of a 
COS job 

• CONNECT - provides access by a COS job to a dataset in the MVS 
system 

See the ISP General Information Manual, CRI publication SG-0094 f , for a 
complete description of these control statements and their use. 



t Publication SG-0094 will be available when the ISP software is 
released. 
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PERMANENT DATASET 
MANAGEMENT 



The permanent dataset management control statements provide methods for 
creating, protecting, and accessing datasets assigned permanently to mass 
storage or magnetic tape. Such datasets cannot be destroyed by normal 
system activity or engineering maintenance. 

Permanent dataset management is introduced in section 6. The following 
permanent dataset management control statements are described in this 
section: 

• SAVE 

• ACCESS 

• ADJUST 

• MODIFY 

• DELETE 

• PERMIT 



SAVE - SAVE PERMANENT DATASET 

The SAVE control statement makes a local dataset permanent and defines 
its associated characteristics for the system. For mass storage 
datasets, saving involves making an entry in the COS-resident Dataset 
Catalog (DSC) , which uniquely identifies the dataset. For magnetic tape 
datasets, saving involves front-end servicing to the defined front-end 
computer system. Under the appropriate conditions, SAVE forces any 
unwritten data (left in the output buffer) to be written, ensuring that 
all the data is made permanent. Since this situation occurs when the 
dataset has been recently written but not yet rewound or closed, SAVE 
attempts to close the dataset. The specific conditions that the dataset 
must meet are described under the SAVE macro (see the Macros and Opdefs 
Reference Manual, CRI publication SR-0012) . A permanent dataset is 
uniquely identified by permanent dataset name (PDN) , additional user 
identification (ID) , edition number (ED) , and ownership value. SAVE is a 
system verb. 
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SAVE has a twofold function: 

• Creation of an initial edition of a permanent dataset 

• Creation of an additional edition of a permanent dataset 

Format : 



J 



SAVE , m=dn , VTm=pdn , ID-uid r ED=ed , RT=rt , R=rd, w=wt , M=mn , UQ , NA , ERR , MSG , 



/ON \ 
EXO= ( off I ' PAM=woJe , Mm-adn (m) , TA=opt , TEXT=text , NOTES=«ot es , 



Parameters are in keyword form; the only required parameter is DN. Only 
the DN parameter is valid for tape datasets. 

DN=cfa Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. This 
dataset can be closed before the dataset is made permanent. 

PDN=pc?7i Permanent dataset name. The default value is dn. The 
name can be 1 through 15 alphanumeric characters. 

ID-uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

ED=e<2 Edition number. A value from 1 through 4095 assigned by 
the dataset creator. The default value is: 

• One, if a permanent dataset with the same PDN and ID 
does not exist, or 

• The current highest edition number plus one, if a 
permanent dataset with the same PDN and ID does exist. 

RT=rt Retention period. User-defined value from 1 through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The default value is an 
installation-defined parameter. 
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R=rd Read control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The read control word of 
the highest numbered existing edition of a permanent 
dataset applies to all subsequent editions of that 
dataset. The default is no read control word. 

W=wt Write control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The write control word of 
the highest numbered existing edition of a permanent 
dataset applies to all subsequent editions of that 
dataset. To obtain write permission, the user must also 
have unique access (UQ) to that dataset. The default is no 
write control word. 

M=mn Maintenance control word. 1 through 8 alphanumeric 

characters. The maintenance control word must be specified 
if a subsequent edition of the same permanent dataset is 
saved. The default is no maintenance control word. 

UQ Unique access. If the UQ parameter is specified, only this 
job can access the permanent dataset at the completion of 
the SAVE function. Otherwise, multiuser access to the 
permanent dataset is granted. 

NA No abort. If this parameter is omitted, an error causes 
the job to abort. 

ERR Error message. If this parameter is specified, error 
termination messages are suppressed. 

MSG Termination message. Normal termination messages are 
suppressed if MSG is specified. 

EXO=| ON I Execute-only dataset. This parameter sets or clears the 
(OFF) execute-only status of the dataset. EXO only or EXO=ON 

causes the dataset to be saved as execute-only. EXO=OFF or 
omission of this parameter causes the dataset to be saved as 
nonexecute-only dataset. When EXO=ON has been specified it 
over ides permitted and public access modes. 



NOTE 

When processing for the SAVE request is 
complete and EXO-ON, all forms of examination 
of this dataset are prohibited. 
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PMA-mode Public access mode. The following modes are allowed: 

N No public access allowed 

E Execute-only 

R Read-only 

W Write-only 

M Maintenance-only 

The installation controls the default PAM value. 

Combinations of R, W, and M permissions are allowed; for 
example, PAM=R:W gives both read and write permissions. 
Note that PAM=E has the same effect as the EXO or EXO=ON 
parameter and nullifies any other permissions specified. 

ADN=ac?rc (m) 

Name of the attributes dataset from which attributes, 
indicated by the modifiers m, are selected. If no 
modifiers are present, then all attributes are selected. 
Attribute parameters such as NOTES*, TEXT=, PAM=, R-, etc. 
take precedence over the modifiers, adn must be the 
local dataset name of a permanent dataset. The modifiers 
must be enclosed with parentheses and separated by colons. 
The following modifiers are supported: 

Modifier Selection from attributes dataset 

PAM Public access mode attribute 

TRACK Public access tracking attribute 

CW Control words 

PERMITS Permit list 

TEXT Text attribute 

NOTES Notes attribute 

ALL All attributes 

TK=opt Track accesses, opt can be either YES or NO and 

indicates whether the owner requires that public accesses 
to the dataset be tracked. See section 6 for a description 
of public access and access tracking. The default TA value 
is NO. 

TEXT=text Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can be 
specified. This text information is considered an attribute 
of the dataset and is retained along with any other 
attributes. See section 6 for an explanation of all 
permanent dataset attributes. 
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UOTES s =note8 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on 
the content of notes, A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 
480 character maximum limit, notes is a permanent 
dataset attribute. See section 6 for an explanation of all 
permanent dataset attributes. 



ACCESS - ACCESS PERMANENT DATASET 

The ACCESS control statement makes an existing permanent dataset local to 
a job and can be used to create a tape dataset. Following the ACCESS 
statement, all references to the permanent dataset must be by the local 
dataset name specified by the DN parameter. ACCESS assures that the user 
is authorized to use the permanent dataset. The ACCESS control statement 
must precede the ASSIGN control statement or the request call for the 
dataset. All tape datasets, whether they are new or not, must be made 
local via the ACCESS control statement or system request. ACCESS is a 
system verb. 

The user need not access a permanent dataset entered into the System 
Directory (SDR) . A tape dataset cannot reside in the SDR. A basic set 
of datasets is entered into the System Directory when the operating 
system is installed. These datasets include the loader, the CFT 
compiler, the CAL assembler, UPDATE, BUILD, and system utility programs 
such as copies and dumps (all utilities described in sections 6 through 
15 are entered in the System Directory) . Other datasets can be entered 
into the System Directory according to site requirements. 

The processing of the ACCESS system request ensures the following: 

• The dataset already exists or for new magnetic tape datasets the 
dataset does not already exist. 

• The requested permissions are allowed. 

• The type of medium on which the dataset resides has been 
previously allocated by the job, provided the medium is a 
dedicated resource (such as magnetic tape) . 
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Format: 



ACCESS , DN=efa , NA , ERR , MSG , IR , ^YM-pdn , ID=uid , ED=ed , R=rd , W=W£ , M=mn , UQ , 



(IN | 
OWN=0U,DT=d£,NEW, RING= | 0UT | r DEti=den r MF=fes t 



VOh-voli'.vol 2 i . • .vol n ,FSEC=fsee,LB=lb,DF=df, PROT,MBS=m&S,MOD, 





XDT=yyddd , RT=r* , FD=/(i f CV=cy , CS=cs , F=f, RF=rf, RS=rs , FSEQ=f seq . 



Parameters are in keyword form; DN is the only required parameter for mass 
storage datasets to make an existing permanent dataset local to a job. 

The following parameters can be used with mass storage datasets: 

DH=dn Local dataset name. The name the job will use to refer to 

the dataset while it remains local to the job. This is a 
required parameter. 

NA No abort indicator. This parameter when selected indicates 
that the job step is not to be aborted if an error arises 
from the access attempt. If omitted, an error condition 
causes the job step to be aborted. 

ERR Error message. If this parameter is specified, error 
termination messages are suppressed. 

MSG Termination message. Normal termination messages are 
suppressed when MSG is specified. 

IR Immediate reply. An ACCESS request cannot always be honored 
immediately. When this is the case, the operating system 
automatically delays the request until it can be honored. 
IR indicates that control is to return to the caller instead 
of delaying the request. If IR is specified, the caller has 
to re-issue the ACCESS request. 
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BDU=pdn Name of a permanent dataset being accessed and already 
existing in the system. The default value is dn. The 
name can be 1 through 15 characters for mass storage 
datasets. 

ID=uid Additional user identification. 1 through 8 alphanumeric 
characters. If uid was specified at SAVE time, the ID 
parameter must be specified on the ACCESS control 
statement. The default is no user ID. This parameter 
applies to mass storage datasets only; it is ignored for 
magnetic tape datasets. 

ED=ed Edition number of permanent dataset being accessed; a value 

from 1 through 4095 was assigned by the dataset creator. 
If the ED parameter is not specified, the default is the 
highest edition number known to the system (for this 
permanent dataset) . This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 

The following parameters are used to identify the permissions for the 
accessing of a mass storage permanent dataset. 

R=rd Read control word as specified at SAVE time. 1 through 8 

alphanumeric characters assigned by the dataset creator. 
The default is no read control word. To obtain read 
permission, this parameter must be specified on the ACCESS 
control statement if a read parameter is specified when the 
dataset is saved. This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 

W=wt Write control word as specified at SAVE time. To obtain 
write permission, this parameter must be specified in 
conjunction with a UQ parameter on the ACCESS control 
statement if a W parameter is specified when the dataset is 
saved. Write permission is required for an ADJUST and 
applies to mass storage datasets only; it is ignored for 
magnetic tape datasets. 

M=nm Maintenance control word as specified at SAVE time. This 

parameter is specified in conjunction with a UQ parameter 
on an ACCESS control statement if the dataset is to be 
subsequently deleted. That is, maintenance permission is 
required to delete a dataset. This parameter applies to 
mass storage datasets only; it is ignored when used for 
magnetic tape datasets. 
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UQ Unique access. This parameter indicates exclusive access 
to the dataset is desired. If the UQ parameter is 
specified and the appropriate write or maintenance control 
words are specified, then write, maintenance, and/or read 
permission is granted. If UQ is not specified, then 
multiuser read access is granted by default (if at a 
minimum, the read control word is specified) • UQ is 
required to delete a permanent dataset using the DELETE 
control statement. This parameter applies to mass storage 
datasets only; it is ignored for magnetic tape datasets. 

OWN=c»y Ownership value. If the own parameter is specified and the 
user has been granted access by the owner, the dataset is 
made local to the job. OWN is ignored if ov matches the 
active ownership value of the job (users need not be 
permitted to their own datasets) . 

The following list describes the parameters available for the accessing 
and/or definition of magnetic tape datasets. 

DN=efa Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. This 
parameter must be present and equated to a valid local 
dataset name not already in use. 

jyj!=dt Tape dataset generic resource name. This parameter is 

required for tape datasets. Up to 16 generic resource 
names can be defined by the installation. Only one generic 
resource name is available with the released system: 

Generic Resource Name Significance 

*TAPE Device capable of 1600 or 6250 bpi 

NEW Creation disposition. Selection of this parameter 

indicates the dataset does not yet exist and is to be 
created by this job. If omitted, the dataset is assumed to 
already exist. NEW datasets must be written before any 
read can occur. NEW and MOD are mutually exclusive. NEW 
automatically selects RING=IN if ring processing is in 
effect. 
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/IN \ 

RING= OUT 

1 'Tape write ring option. The choices are IN if the tape is 

to be written, and OUT if the tape is to be read only. 
This parameter is in effect only if the installation 
parameter I8RNGABT is selected at your site. 

DEU=den Density of the tape dataset. This parameter applies only 
to tape datasets; it is ignored when used for mass storage 
datasets. 

6250 Dataset density of 6250 bpi, default 
1600 Dataset density of 1600 bpi 

MF^fes Front-end servicing mainframe identifier. This parameter 
allows specification of an alternate front-end computer 
system to which servicing requests are directed. If 
omitted, the front-end of job origin is used. Front-end 
servicing is a mechanism whereby auxiliary servicing (such 
as updating of front-end resident catalogs and tape 
management systems) of the dataset and/or tape volumes is 
performed. 

The following parameters identify the magnetic tape dataset to be 
accessed: 

PDN=pi« Permanent dataset name or file identifier. This parameter 
can be 1 to 44 characters and is the primary means of 
identifying the dataset. For labeled tape datasets (AL and 
SL) , the rightmost 17 characters of the PDN are used to 
match the file identifier from the label group. With 
front-end servicing the whole value given is generally used 
as the identifier. If PDN is omitted, then the DN value is 
used. 

VOL=yol volume identifier list. An optional list of 1- through 

6-character volume identifiers (Vis) identify tape volumes 
where the dataset resides. The list contains up to 255 
Vis. If the VI list is omitted for a new tape dataset, 
then the tape volumes on which the dataset is written are 
selected by the operator and front-end servicing routine. 
This condition is termed a nonspecific volume allocation. 
If the VI list is omitted for an old tape dataset, then the 
volumes on which the dataset resides are determined by 
front-end servicing. If front-end servicing has no 
knowledge of the dataset or is inactive, the omission of 
the VI list results in a job step abort. 

FSEC=fsee File section number or volume sequence number. This 

parameter describes on which volume, relative to the first 
physical volume of the dataset, to begin processing. 
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The volume sequence number for the first volume of the 
dataset is 1. If fsee is omitted, a value of 1 is 
assumed. This parameter has a direct relationship to the 
Vis specified in the VOL parameter. The volume sequence 
number corresponds to the first VI identified in the VOL 
parameter. For example, to access a tape dataset starting 
with the eighth section, specify FSEC=8 on the ACCESS call. 
If both the MOD and FSEC=fsee are coded, the FSEC 
parameter is not used for validating the header label. 
Instead it represents the position of the volume serial 
number in the volume list where MOD processing will begin. 

Example: coding the following causes processing to start 
with tape T2. 

ACCESS , . . . MOD , V0L=T1 : T2 : T3 , FSEC=2 , . . . 

LB=lb Tape dataset label type indicating the format of the tape. 

If this parameter is omitted, label type NL is assumed. 

SL IBM standard labeled tapes 

NL Unlabeled tapes; default. 

AL ANSI standard labeled tapes 

FSL Field format with IBM standard labels 

FAL Field format with ANSII standard labels 

FNL Field format with no labels 

Field format tape datasets treat imbedded end-of-f iles or 
tapemarks as data. Tapemarks that are not followed by a 
label are returned in the data EOF control words. On 
output, EOF control words that are not followed by an EOD 
control word are converted to physical tapemarks. 

The following parameters identify the characteristics of a magnetic tape 
dataset. 

DF=df Recording format. This parameter identifies in which 

format the tape dataset is to be read and/or written. 
Legal values for this parameter are: 

TR Transparent format 
IC Interchange format 

If omitted the format is transparent. For a description of 
the formats and the associated properties see section 2. 
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PROT f Front-end protect indicator. This parameter indicates to 
the front-end computer system performing the service 
functions that the tape dataset and/or its volumes are to 
be protected. PROT is recognized for new tape dataset s 
only. If PROT is omitted, the dataset and its volumes are 
not protected. 

MBS=mbs Maximum tape block size. If foreign dataset translation is 
requested by specifying FD, values for mbs are different. 
See the description of the FD parameter below, mbs values 
are different for IBM and CDC tape files. 

When defined for IBM tape files, mbs is the maximum block 
length in 8-bit bytes. The only mbs restriction for IBM 
tape files is that the value be less than or equal to 32760 
bytes . 

When defined for CDC tape files, mbs is the maximum block 
length in 6-bit characters. The default is 0*5120 
characters. It is recommended that the user not override 
this default value to ensure interchangeability with all 
CYBER operating systems. 

If MBS is omitted and the dataset is new, a default size 
determined by the site is used. The limiting value of the 
parameter is also left to site definition. If omitted for 
an existing labeled dataset (AL or SL) , the maximum block 
size is set to the value from the label group. Exceeding 
this size when writing results in a job abort condition of 
WRITE FORMAT ERROR. When reading a tape block that is 
larger than the specified value, a job abort condition of 
LARGE BLOCK ENCOUNTERED is produced. MBS is rounded up to 
the next multiple of 4096 bytes for transparent format tape 
datasets . 

MOD Existing tape dataset modification identifier. This 

parameter allows the user to position single volume and 
multivolume datasets on tape. It specifies that data will 
be added at the end of an existing dataset on either 
standard labeled or unlabeled tapes. Access requests using 
MOD for tape volume positioning are only successful if the 
end of a dataset is indicated by the end-of-file trailer 
label for a labeled tape volume, and by a tape mark for an 

unlabeled tape. MOD and NEW are mutually exclusive. MOD 
selects RING=IN if ring processing is in effect. 



t Deferred implementation 
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"XXfE^yyddd Expiration date. Indicates the date this tape dataset 
may be overwritten, yy specifies the year and is a 
number from through 99. ddd specifies the day in 
theyear and is a number from 001 through 366. This 
parameter identifies the year and the day on which a new 
tape dataset is considered dormant. If omitted and the 
dataset is going to be written, the current date is used. 
This parameter is also used as a means of communicating 
with a servicing front-end computer system. The XDT and RT 
parameters are mutually exclusive. 

RT=i*£ Retention period. User-defined value from 1 through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The RT parameter is similar to the 
XDT parameter but allows the user to specify relative 
expiration date. If RT is omitted, the default value used 
is no days of retention. This parameter is mutually 
exclusive with the XDT parameter. 

The following tape dataset parameters specify that record and data format 
conversion are to be performed on the tape dataset at run time. 

FD=fd Foreign dataset translation identifier, fd is a 

3-character code which indicates that foreign dataset 
translation is to be performed on the dataset. This 
parameter is required for run-time translation. Valid 
values for fd are: 

IBM IBM-compatible sequential file 
CDC CDC-compatible sequential file 

The default is no translation. 

CV-ov Foreign dataset conversion mode. CV indicates if implicit 

data conversion is to be done by the runtime library. CV 
values are: 

ON Data conversion turned on. ON causes the library 
to convert the foreign internal representation to 
or from Cray internal representation, according 
to the I/O list. 

OFF Data conversion turned off. The data type is not 
considered when OFF is specified. Full Cray words 
are moved to or from the foreign dataset. 

The default is no data conversion. 

CS=cs Foreign data character set. This parameter specifies the 

character set to represent the internal data on the foreign 
dataset. Run-time library routines convert character data 
from the os character set to ASCII when implicit data 
conversion is turned on. 
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The valid es values are: 

AS ASCII 

EB EBCDIC. EB is the default for IBM tape file 
translation. 

DC Control Data display code. This option is illegal 
when IBM tape file translation is requested. DC is 
also the default for CDC tape file translation. 

F=/ Tape format. / is a 1- or 2-character code which 

describes a CDC tape format type. It is required for CDC 
tape file translation. No default value is provided for 
F. Valid F values are: 

I Internal tape format 

SI System or SCOPE internal tape format 

JXF=rf Record format, or block and record type. When defined 

for IBM tape files, RF refers to record format, rf is a 
1- to 3-character code which describes an IBM record format 
Valid values for RF when defining IBM tape files are: 

U Undefined-length records 

F Fixed-length records 

FB Fixed-length blocked records 

V Variable-length records 

VB Variable-length, blocked records 

VBS Variable-length, blocked, spanned records 

No default value is provided. However, RF can be omitted 
when accessing an IBM standard labeled tape file. In that 
case the record format designated on the label is used. If 
NEW is specified, RF=U. 

When defined for CDC tape files, RF refers to block and 
record type. In this case rf is a 2-character code which 
describes a CDC block and record type. The first of the 
2-character code describes the block type: 

I Internal block type 

C Character-count block type 

The second character of the 2-character code describes the 
record type: 

W Control-word record type 

Z Zero-byte record type 

S System-logical record type 

No default value is provided. RF is required for CDC tape 
file translation. The following rf values are supported 
for CDC tape files: 
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IW Internal block type, control-word record type 

CW Character-count block type, control-word record type 

CZ Character -count block type, zero-byte record type 

CS Character-count block type, system-logical record type 

RS=2*s Tape dataset record size, rs is the decimal length of 

the record, and its expression varies for IBM and CDC tape 
files. 

When defined for IBM tape files, rs is the decimal length 
of the record in 8-bit bytes. The default is set according 
to the requested record format. However, no default value 
is used when accessing an IBM standard labeled tape file. 
Instead the record size designated by the label is used. 
Table 9-1 shows the defaults for which RS is set for IBM 
tape files. 



Table 9-1. RS defaults for IBM tape files 



Record format 


Default 


Undefined-length 


RS=MBS 


Fixed-length 


Fixed-length, blocked 


Var iable-leng th 


RS=MBS-4 


Variable-length, blocked 


Variable-length, blocked, spanned 



In addition, restrictions are enforced on IBM tape files 
at ACCESS processing time. Table 9-2 summarizes those 
restrictions. Nonetheless, restrictions are not enforced 
if the tape file accessed is an IBM standard labeled tape 
file, and if neither RS nor MBS are specified. 
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Table 9-2. RS restrictions for IBM tape files 



Record format 


Restriction 


Undefined-length 


RS=MBS 


Fixed-length 


Fixed-length, blocked 


MBS is multiple 
of RS 


Variable-length 


RS<MBS-4 


Variable-length, blocked 


Variable-length, blocked, spanned 


None 



For CDC tape files, rs is the decimal length of the 
record in 6-bit characters. 

rs refers to the maximum record length when W is specified 
as a value for RF. The default or RS=0 imply that there is 
no maximum record length. 

When Z is specified as a value for RF, rs becomes the 
equivalent of the CDC FL parameter: rs specifies the 
length to which zero-byte records are to be extended with 
blank characters on input and the length of a zero-byte 
record on output. This parameter is required for zero-byte 
record translation. No default value is provided for rs 
when Z is specified as an RF value. 

For CDC system-logical records, rs is the maximum record 
length. The default or RS=0 imply that there is no maximum 
record length. 

FSEQ=*fseq File sequence number. This is a one- to four-digit 

number that describes the relative position of the dataset 
on the tape volume. The default is 1. 



ADJUST - ADJUST PERMANENT DATASET 

The ADJUST control statement changes the size of a mass storage permanent 
dataset; that is, it redefines the size of the dataset. When a permanent 
dataset is overwritten, and the dataset size changes, issuing an ADJUST 
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statement informs the system of the dataset* s new size. An ADJUST of a 
permanent dataset can be issued if the dataset has been previously 
accessed within the job with write permission. ADJUST is a system verb. 

Under the appropriate conditions, ADJUST forces any unwritten data to 
mass storage to ensure that all of the dataset is made permanent. Since 
this situation occurs when the dataset has been recently written to but 
not yet closed, ADJUST attempts to close the dataset. The specific 
conditions that the dataset must meet are described under the ADJUST 
macro (see the Macros and Opdefs Reference Manual, CRI publication 
SR-0012) . 

The ADJUST statement is ignored when used with magnetic tape datasets. 



Format : 



ADJUST, DN=cfo,NA,ERR,MSG. 



Parameters: 
m=dn 



Local dataset name of a permanent dataset that has been 
accessed with write permission. This dataset can be closed 
before the ADJUST statement is processed. 



NA 



ERR 



No abort. If this parameter is omitted, an error causes the 
job step to abort. 

Error message. If this parameter is specified, error 
termination messages are suppressed. 



MSG 



Termination message. Normal termination messages are 
suppressed when MSG is specified. 



MODIFY - MODIFY PERMANENT DATASET 

The MODIFY control statement changes permanent dataset information 
established by the SAVE function or a previously executed MODIFY 
function. A permanent dataset must be accessed with unique access (UQ) 
and all permissions before MODIFY can be issued. MODIFY is a system verb. 

Once a permanent dataset exists, the read, write, and maintenance control 
words, public access mode, and access tracking may apply to subsequent 
editions of that permanent dataset. MODIFY applies to mass storage 
datasets only; it is ignored for tape datasets. 
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Format: 



MODIFY, DU=dn ,PDH=pdn , ID=uid,ED=ed r RT=rt,R=rd r W=*)t ,M=mn , NA,ERR,MSG, 



/ 




ON 



EXO= j 0FP | , vm=mode , Tk=opt , TEXT=text , NOl!ES=notes . 



Parameters are in keyword form; the only required parameter is DN. 

DN=<in Local dataset name of a permanent dataset that has been 

accessed with all permissions. DN is a required parameter. 

T?DH=pdn New permanent dataset name to be applied to the existing 
dataset. If this parameter is omitted, the existing 
permanent dataset name is retained. 

IH^uid New additional user identification, to be applied to the 
existing permanent dataset. 1 through 8 alphanumeric 
characters. If this parameter is omitted, the existing 
user ID is retained. If this parameter is present without 
a value, user identification is established as binary zeros 

ED=ed New edition number to be applied to the existing permanent 

dataset. If this parameter is omitted, the existing 
edition number is retained. 

RT=rt New retention period to be applied to the existing 

permanent dataset. If this parameter is omitted, the 
current retention period is retained. If this parameter is 
present without a value, the retention period is set to the 
installation-defined value. 

R=rd New read permission control word to be applied to the 

existing permanent dataset. If this parameter is omitted, 
the existing read permission is retained. If R is present 
without a value, read permission is established as binary 
zeros. 

W=wt New write permission control word to be applied to the 

existing permanent dataset. If this parameter is omitted, 
the existing write permission is retained. If W is present 
without a value, write permission is established as binary 
zeros. 
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M=mn New maintenance permission control word to be applied to 

the existing permanent dataset. If this parameter is 
omitted, the existing maintenance permission is retained. 
If M is present without a value, maintenance permission is 
established as binary zeros. 



NA 



ERR 



MSG 



EXO 0N 
lOPF 



No abort. If this parameter is omitted, an error causes 
the job to abort. 

Error message. If this parameter is specified, error 
termination messages are suppressed. 

Termination message. Normal termination messages are 
suppressed when MSG is specified. 

Execute-only dataset. This parameter sets or clears 
the execute-only status of a dataset. EXO only or 
EXO-ON causes the dataset to be modified to execute-only. 
EXO=OFF causes the dataset to be modified to a 
nonexecute-only dataset. If this parameter is omitted, the 
execute-only status of a dataset is unchanged. 



NOTE 



When processing for the MODIFY request is 
complete and EXO=ON, all forms of examination 
of this dataset are prohibited. 



PMA=mode Public access mode. The following modes are allowed: 

N No public access allowed 

E Execute only 

R Read only 

W Write only 

M Maintenance only 



Tk=opt 



The installation controls the default PAM value. 
Combinations of R, W, and M permissions are allowed; for 
example, PAM=R:W gives both read and write permissions. 
Note that PAM=E has the same effect as the EXO or EXO=ON 
parameter and nullifies any other permissions specified. 

Track accesses, opt can be either YES or NO and 
indicates whether the owner requires that public accesses 
to the dataset be tracked. See section 6 for a description 

of public access and access tracking. The default TA value 
is NO. 
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TEXT=text Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can 
be specified. This text information is considered an 
attribute of the dataset and is retained along with any 
other attributes. See section 6 for an explanation of all 
permanent dataset attributes. 

NOTES =notes 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on 
the content of notes. A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 
480 character maximum limit, notes is a permanent 
dataset attribute. See section 6 for an explanation of all 
permanent dataset attributes. 



DELETE - DELETE PERMANENT DATASET 

The DELETE control statement clears the permanence state for a dataset. 
For mass storage datasets this involves clearing the dataset' s definition 
from the Dataset Catalog (DSC). For magnetic tape datasets, a request to 
remove the dataset' s definition from the front-end's catalog is sent to 
the servicing front-end computer system. If PARTIAL is specified, the 
dataset is deleted but its attributes are retained. To issue a DELETE of 
a dataset, the job must have previously accessed the dataset with 
maintenance permission, if a maintenance control word exists for the 
dataset, and unique access (UQ) . The dataset remains a local dataset 
after deletion until job termination or execution of a RELEASE control 
statement. DELETE is a system verb. 



Format : 



DELETE, DN=*fo ,NA,ERR,MSG, PARTIAL. 



Parameters: 



DH=dn Local dataset name of a permanent dataset accessed with 

maintenance permission and unique access 

NA No abort. If this parameter is omitted, a fatal error 
causes the job step to abort. 
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ERR 



MSG 



PARTIAL 



Error message. If this parameter is specified, error 
termination messages are suppressed. 

Termination message. Normal termination messages are 
suppressed if MSG is specified. 

Partial delete. Presence of this keyword causes the system 
to delete only the mass storage resident data. The DSC 
entry and the dataset* s attributes information are 
retained. PARTIAL can be specified only for a mass storage 
dataset. 



PERMIT - EXPLICITLY CONTROL ACCESS TO DATASET 

The PERMIT control statement allows a user to explicitly designate who 
can access a particular permanent dataset. PERMIT applies to all 
editions of the permanent dataset. This dataset need not be local for 
PERMIT to be executed. PERMIT applies to user permanent mass storage 
datasets only. Access permission given with a PERMIT control statement 
takes precedence over the PAM parameter described under SAVE and MODIFY. 
PERMIT is a system verb. 



Format : 



PERMIT, PDN=p*fo , ID=uid, AM=W, RP,USER=tfy , ADN=adrt ,NA,ERR,MSG. 



Parameters: 
T?DH=pdn 

ID=uid 



Name of an existing user permanent dataset. The name can 
be 1 through 15 characters. PDN is a required parameter. 

Additional user identification. 1 through 8 alphanumeric 
characters. If ID was specified on the SAVE request, the 
ID parameter must be specified on the PERMIT control 
statement. The default is no user ID. 



AM=tf? 



Access mode permitted for alternate user. These modes are 



N No dataset access allowed 

E Execute-only 

R Read-only 

W Write-only 

M Maintenance-only 
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RP 



USER=OV 



Each installation controls the default AM value. 
Combinations of R, W, and M permissions are allowed; for 
example, AM=R:W gives both read and write permissions. 
Note that AM=E gives the permitted user execute-only access 
to the dataset, effectively nullifying any other 
permissions specified. 

Remove permit parameter. Removes the permit associated 
with the specified ownership value. 

User ownership value associated with the user being 
permitted 



ADN=ck?w Local dataset name of the attributes dataset from which the 
permit list is copied 



NA 



ERR 



MSG 



No abort. If this parameter is omitted, an error causes 
the job step to abort. 

Error message. If this parameter is specified, error 
termination messages are suppressed. 

Termination message. Normal termination messages are 
suppressed when MSG is specified. 



EXAMPLES OF PERMANENT DATASET CONTROL STATEMENTS 

To clarify the permanent dataset management control statements, some 
examples follow: 

1. A user identified as USERXYZ creates a permanent dataset, which 
no other user can access. All subsequent editions of this 
dataset share this attribute. 

SAVE , DN=ABC , PDN=EXAMPLE1 , ED=1 , PAM=N , TA=NO . 

2. A user identified as USERXYZ, creates a permanent dataset, which 
can be accessed by all other users in read mode. 

SAVE , DN=XYZ , PDN=EXAMPLE2 , ED=1 , PAM=R , TA=NO . 

3. An alternate user is accessing the permanent dataset created in 
example 2. 

ACCESS , DN=LOCAL , PDN=EXAMPLE2 , ED=1 , OWN=USERXYZ . 

The system does not track the alternate user access since the 
dataset was created with TA=NO. 
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4. Allow another user (known in this example as USER1) to access the 
permanent dataset created in example 1 in read and execute mode 
only. 

PERMIT, PDN=EXAMPLE1 , USER=USER1 , AM=R: E . 

5. Enable public access tracking for the permanent dataset created 
in example 2. 

ACCESS , DN=LOCAL , PDN=EXAMPLE2 , ED=1 , UQ . 
MODIFY , DN=LOCAL , TA= YES . 

6. Permit write mode access for PDN=EXAMPLE2 to users known as USER2 
and USER3. 

PERMIT, PDN=EXAMPLE2 , USER=USER2 , AM=W. 
PERMIT , PDN=EXAMPLE2 , USER=USER3 , AM=W . 

7. Change the permission granted to USER1 in example 4 to AM=W. 

PERMIT , PDN=EXAMPLE1 , USER=USER1 , AM=W . 

8. Remove the access permission granted to USER1 in example 7. 

PERMIT , PDN=EXAMPLE1 , USER=USER1 , RP . 

9. User USERXYZ acquires a dataset, then permits another user to use 
it and subsequently partially deletes the dataset to retain just 
the PERMITS and TEXT information. 

ACQUIRE, DN=EX9,TEXT= ' ' ,UQ. 

PERMIT , PDN=EX9 , USER=SOMEONE , AM=R . 
DELETE ,DN=EX9, PARTIAL. 

10. User USERXYZ creates a permits template. 

SAVE , DN=EX1 , PDN=PERMS , * 

NOTES=' PERMITS TEMPLATE FOR AERO USERS. ' 

•THESE PERMITS SHOULD BE REMOVED AFTER OCT 31, 1983.', UQ. 

PERMIT , PDN=PERMS , USER=USERA , AM=E . 

PERMIT , PDN=PERMS , USER=USERB , AM=R . 

PERMIT , PDN=PERMS , USER=USERC , AM=W . 

DELETE , DN=EX1 , PARTIAL . 

11. User SOMEONE acquires the dataset that was partially deleted in 
example 9. 

ACQUIRE , DN=LOCAL , PDN=EX9 , OWN=USERXYZ . 

Note that the TEXT need not be specified and that after the 
dataset has been acquired from the front-end computer system, it 
is made permanent and belongs to user USERXYZ. 
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DATASET STAGING CONTROL 10 



Staging is the process of transferring jobs and data in the form of COS 
datasets from a front-end computer system to Cray mass storage or of 
transferring datasets from Cray mass storage to a front-end computer 
system. Dataset staging control is introduced in section 6. 

Three control statements support staging datasets between Cray mass 
storage and a front-end system: ACQUIRE, FETCH, and DISPOSE. Another 
control statement, SUBMIT, directs datasets to the COS input queue. 



ACQUIRE - ACQUIRE PERMANENT DATASET 

The ACQUIRE control statement allows the user to make a dataset permanent 
and accessible to the job making the request. ACQUIRE is a system verb. 
Some ACQUIRE control statement examples are included with the permanent 
dataset management examples (see section 10) . 

When an ACQUIRE control statement is issued, COS determines if the 
requested dataset is front-end resident or permanently resident on Cray 
mass storage by checking the COS Permanent Dataset Catalog (DSC) for a 
dataset with matching PDN, ID, ED, and ownership value fields. 

If COS determines that the requested dataset is already permanently 
resident on Cray mass storage, dataset access is granted to the job 
making the request. 

If the requested dataset is not a COS mass storage permanent dataset, the 
request for the dataset is sent to the front-end system. The front-end 
system stages the dataset to Cray mass storage. COS then makes the 
dataset permanent and grants dataset access to the job making the 
request. Until the dataset is made permanent, processing of the job 
making the request is delayed. 
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Format: 



ACQUIRE , DH=dn , PDH=pdn , ID=uid , ED=ed , RT=rt , R-rd , W=w t , M-wi , UQ , 




TEXT=£ ext , MF=mf ,TlD=tid, DF=df , om=own , vmmode , 





Aim=adn (m) , TA=opt, NOTES=wo tes , ERR,MSG . 



Parameters are in keyword form; the only required parameter is DN. 

UN=dn Local dataset name. The name the job will use to refer to 

the dataset while it remains local to the job. 1 through 7 
alphanumeric characters, the first of which is A through Z, 
$, @, or %; remaining characters can also be numeric. DN 
is a required parameter. 

T?DW=pdn Name of COS permanent dataset to be accessed or staged 
from a front-end system, saved, and accessed. The 
permanent dataset name is passed to the front-end system; 
it is the name saved by the system if the dataset is 
staged, pdn is 1 through 15 alphanumeric characters 
assigned by the dataset creator. The default for pdn is 
dn. 

ID=uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

ED=ed Edition number. A value from 1 through 4095 assigned by 

the dataset creator. The default value is: 



RT=rt 



• One, if a permanent dataset with the same PDN and ID 
does not currently exist, or 

• The current highest edition number of that dataset if 
the permanent dataset with the specified PDN and ID 
does exist. 

Retention period. User-defined value from 1 through 4095 
specifying the number of days a permanent dataset is to be 
retained by the system. The default value is an 
installation-defined parameter. 
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R=rd Read control word. 1 through 8 alphanumeric characters 

assigned by the dataset creator. The default is no read 
control word. 

W=wt Write control word. 1 through 8 alphanumeric characters 
assigned by the dataset creator. The default is no write 
control word. 

M=97m Maintenance control word. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The control 
word must be specified if a subsequent edition of the 
permanent dataset is saved. If no staging occurs, and the 
dataset is to be deleted, this parameter can be specified 
in conjunction with the UQ parameter (that is, maintenance 
permission is required to delete a dataset) . 

UQ Unique access. If the UQ parameter is specified, the job 
is granted unique access to the permanent dataset; 
otherwise, multiaccess to the permanent dataset is 
granted. If no staging is performed because the dataset 
already exists, write, maintenance, and/or read permission 
can be granted if the appropriate read, write, and/or 
maintenance control words are specified. 

TEXT=texb Text to be passed to a front-end computer system requesting 
transfer of the dataset. A maximum of 240 characters can be 
specified. This text information is considered an attribute 
of the dataset and is retained along with any other 
attributes. See section 6 for an explanation of all 
permanent dataset attributes. 

MF=rrf Identifier for the front-end computer. 2 alphanumeric 

characters. The default is the front end of job origin. 

TID-tid Terminal identifier. 1 through 8 alphanumeric characters 
identifying destination terminal. The default is the 
terminal of job origin. 

DF==df Dataset format. This parameter defines whether a dataset is 

to be presented to the Cray Computer System in COS blocked 
format and whether the front-end system is to perform 
character conversion. The default is CB. 

For example, a user wishes to acquire a dataset from 
magnetic tape in blocked binary as it appears at the 
front-end system. In this case, BB is specified. 

(if is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests support 
of the following codes: 
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CD Character deblocked. The front-end system performs 
character conversion to 8-bit ASCII, if necessary. 

CB Character blocked. The front-end system blocks the 
dataset before staging and performs character 
conversion to 8-bit ASCII, if necessary. 

BD Binary deblocked. The front-end system does not 
perform character conversion. For ACQUIRE, BD is 
the same as TR. 

BB Binary blocked. The front-end system blocks the 
dataset before staging but does not do character 
conversion. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 

OWN=e>u Ownership value. If the own parameter is specified and the 
user has been granted access by the owner, the dataset is 
made local to the job. OWN is ignored if ov matches the 
active ownership value of the job (users need not be 
permitted to their own datasets) . 

JPAMrTnode Public access mode. The following modes are allowed: 

N No public access allowed 

E Execute only 

R Read only 

W Write only 

M Maintenance only 

Combinations of R, W, and M permissions are allowed; for 
example, PAM=R:W gives both read and write permissions. 
Note that PAM=E has the same effect as the EXO or EXO=ON 
parameter and nullifies any other permissions specified. 
Each installation controls the default PAM value. 



ADN-adn (m) 



Name of attributes dataset from which attributes, indicated 
by the modifiers m, are selected. If no modifiers are 
present, then all attributes are selected. Attribute 
parameters such as NOTES=, TEXT=, PAM=, R=, etc. take 
precedence over the modifiers, adn must be the local 
dataset name of a permanent dataset. The modifiers must be 
enclosed with parentheses and separated by colons. The 
following modifiers are supported: 
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Modifier Selection from attributes dataset 

PAM Public access mode attribute 

TRACK Public access tracking attribute 

CW Control words 

PERMITS Permit list 

TEXT Text attribute 

NOTES Notes attribute 

ALL All attributes 

Th=opt Track accesses, opt can be either YES or NO and indicates 
whether the owner requires that public accesses to the 
dataset be tracked. See section 6 for a description of 
public access and access tracking. The default TA value is 
NO. 

UOTES=notes 

Notes to be associated with the dataset. A maximum of 480 
characters can be specified. There is no restriction on the 
content of notes. A caret symbol in notes signifies 
end-of-line and causes AUDIT to advance to a new line when 
listing the notes. The caret symbol is included in the 480 
character maximum limit, notes is a permanent dataset 
attribute. See section 6 for an explanation of all permanent 
dataset attributes. 

ERR Error message. If this parameter is specified, error 
termination messages are suppressed. 

MSG Termination message. Normal termination messages are 
suppresed when MSG is specified. 



DISPOSE - DISPOSE DATASET 

The DISPOSE control statement directs a dataset to the COS output queue 
for staging to a specified front-end computer system. DISPOSE can also 
be used to alter the effects of a previous DISPOSE, DEFER of the same 
dataset. 

Defining the DISPOSE characteristics can be done before the actual 
staging via the DEFER parameter. The DEFER parameter saves all selected 
dispose parameters for use when the dataset is released, which is when 
the actual staging is initiated. DISPOSE is a system verb. 
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Format : 



DISPOSE , DK=dn , SDK=sdn , DC=do , DF=df ,MF=mf , SF=s/, IV>=uid , TlD=Hd, 



ED=ed , RT=rt , R=rd , W=w£ , M=?7m , TEXT=t ext , WAIT , NOWAIT , DEFER , NRLS . 



Parameters are in keyword form; the only required parameter is DN. 

TM=dn Local dataset name. Name by which the dataset is known to 

the user job, DN is a required parameter. 

SDN=s<2?? Staged dataset name. 1 through 15 character name by which 
the dataset is to be known at the destination front end. 
The default for sdn is dn. 

DC s de Disposition code. Disposition to be made of the dataset. 

If the DC parameter is omitted, the default is PR. 

do is a 2-character alphanumeric code describing the 
destination of the dataset as follows: 

IN Input (job) dataset. Dataset is queued as a job on 
the mainframe specified with the MF parameter. 

ST Stage to front end. Dataset is made permanent at the 
front end designated by the MF parameter. 

SC Scratch dataset. Dataset is released, unless another 
DISPOSE request is still pending on the dataset. 
This parameter has the same effect as RELEASE, DH=dn. 

PR Print dataset. Dataset is printed on a printer 
available at the front end designated by the MF 
parameter . 

PU Punch dataset. Dataset is punched on any card punch 
available at the front end designated by the MF 
parameter . 

PT Plot dataset. Dataset is plotted on any available 
plotter at the front end designated by the MF 
parameter . 
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MT Write dataset on magnetic tape at the front end 
designated by the MF parameter. 



NOTE 

The dataset dispositions noted above are by 
convention only. Actual dataset disposition 
is determined by the destination front end. 



DF=df Dataset format. This parameter defines whether a dataset 

is sent from the Cray Computer System in COS-blocked format 
and whether the front-end system is to perform character 
conversion. The default is CB. 

For example, a user wishes to save a dataset on magnetic 
tape in blocked binary as it appears on COS mass storage. 
In this case, BB is specified. A user who wants a dataset 
printed can specify CB if the front-end computer handles 
deblocking. 

df is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests 
support of the following codes: 

CD Character deblocked. The front-end system performs 
character conversion from 8-bit ASCII, if necessary. 

CB Character blocked. No deblocking is performed at the 
Cray mainframe before staging. The front-end system 
performs deblocking and character conversion from 
8-bit ASCII, if necessary. 

BD Binary deblocked. The front-end system does not 

perform character conversion. For DISPOSE, BD is the 
same as TR. 

BB Binary blocked. The front-end system does not 
perform character conversion. The Cray mainframe 
does not perform deblocking before staging. The 
front-end system is expected to perform deblocking. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 
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Other codes can be added by the local site. Undefined 
pairs of characters can be passed but are treated as 
transparent mode by COS. 

MF=w/ Front-end computer identifier. 2 alphanumeric characters. 
Identifies the front end to which the dataset is to be 
staged. If omitted, the front end where the issuing job 
originated is used. If MF is given a value of a Cray 
mainframe ID and DC=IN, an error message is issued and the 
job step is aborted (see the SUBMIT control statement later 
in this section) . 

SF=s/ Special form information to be passed to the front-end 
system. 1 through 8 alphanumeric characters. SF is 
defined by the needs of the front-end system. 

ID=uid Additional user identification. 1 through 8 alphanumeric 

characters assigned by the dataset creator. The default is 
no user ID. 

TID=tid Terminal identifier. 1 through 8 alphanumeric characters 
identifying destination terminal. The default is terminal 
of job origin, where applicable. 

ED=ed Edition number, meaningful only if DC=ST. A user-defined 

value from 1 through 4095. The default value depends on 
the destination front end. 

RT=r»t Retention period, meaningful only if DC=ST. A user-defined 
value from 1 through 4095 specifying the number of days a 
dataset is to be retained by the destination front end. 
The default value depends on the destination front end. 

R=rd Read control word, meaningful only if DC=ST. 1 through 8 

alphanumeric characters. The default is no read control 
word. 

W=wt Write control word, meaningful only if DC=ST. 1 through 8 
alphanumeric characters. The default is no write control 
word. 

M=mn Maintenance control word, meaningful only if DC=ST. 1 

through 8 alphanumeric characters. The default is no 
maintenance control word. 
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TEXT=text Text to be passed to the front-end system requesting 

transfer of a dataset. The format for TEXT is defined by 
the front-end system for managing its own datasets or 
files. Typically, text is in the form of one or more 
control statements for the front-end system; these 
statements must contain their own terminator for the front 
end. text cannot exceed 240 characters. 



NOTE 

text specified on the DISPOSE control 
statement is not the same as the permanent 
dataset text attribute. Any text 
existing as a permanent dataset attribute is 
ignored by DISPOSE (see section 6 for 
discussion) . 



WAIT Job wait. When this parameter is specified, the job does 
not resume processing until the disposed dataset has been 
staged to the front-end system. If the front-end system 
cancels the transfer, the waiting job is aborted and job 
step abort processing occurs as described in section 3. If 
WAIT is not specified, processing can resume immediately 
upon issue of the DISPOSE, depending upon an installation 
option. The WAIT parameter is useful in detecting 
unsuccessful transfers. 

NOWAIT When this parameter is specified, the job does not wait 

until the dataset has been staged to the front-end system 
but resumes processing immediately. If the front-end 
system cancels the transfer, no special action is taken; 
that is, the job is not aborted. If neither WAIT or NOWAIT 
are specified, processing can resume immediately upon issue 
of the DISPOSE, depending upon an installation option. 

DEFER When this parameter is specified, the disposition occurs 

when the dataset is released either by a RELEASE request or 
job termination. The dispose characteristics are saved and 
used when the dataset is released. 

NRLS No release. When this parameter is specified, the dataset 
remains local to the job after the DISPOSE request has been 
processed. When NRLS is specified on a DISPOSE control 
statement, the dataset cannot be written to, until the 
transfer to the specified front end is completed. 
Therefore, it is advisable to use WAIT with NRLS. 
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SUBMIT - SUBMIT JOB DATASET 

With SUBMIT, a job running on the Cray mainframe can direct another 
dataset (which must also be a job) to the COS input queue. The job that 
is submitted executes independently of the submitting job. SUBMIT is a 
system verb. 



Format : 



SUBMIT , DU=dn , SID=s/, DID^ff , TID=Hd , DEFER, NRLS . 



Parameters are in keyword format; the only required parameter is DN. 

DU=dn Local dataset name. A valid local dataset name. DN is a 

required parameter and must be given a value. 

SID-sf Default source front-end system identifier; 2 alphanumeric 
characters. If an MF parameter is not specified in an 
ACQUIRE or FETCH control statement within the submitted 
job, the SID parameter defines the default source front-end 
system for the dataset to be acquired. If the MF and SID 
parameters are omitted, the default source identifier of 
the submitting job is used. 

DID=df Default destination front-end identifier; 2 alphanumeric 
characters. If an MF parameter is not specified in a 
DISPOSE control statement within the submitted job, the DID 
parameter defines the default destination front-end system 
for the dataset to be disposed. If the MF and DID 
parameters are omitted, the default destination identifier 
of the submitting job is used. 

TID=tid Default terminal identifier. 1 through 8 alphanumeric 

character identifier defining the default terminal ID for 
the submitted job. If TID is omitted, then the terminal ID 
of the submitting job is used. 

DEFER Deferred submit. Selection of this parameter causes the 

SUBMIT characteristics to be defined, with a release of the 
dataset actually initiating the submit of the dataset. If 
DEFER is omitted, the SUBMIT occurs immediately. 

NRLS No release. This parameter indicates if the dataset is to 
remain local to the job after SUBMIT has been processed. 
If NRLS is omitted, the dataset is released after the 

SUBMIT. If selected, the dataset remains local to the job 
after the SUBMIT and is available for reading only. 
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FETCH - FETCH LOCAL DATASET 

The FETCH control statement allows the user to make a dataset that 
resides on a front-end computer system local to the COS job. The dataset 
is transferred from the front-end computer system. The dataset is not 
made permanent on the Cray Computer System. The originating job is 
delayed until the dataset arrives on Cray mass storage. 



Format : 



FETCH , DN=*2« , SDN=sd« , TEXT=t ext , MF=wf , TID=Hd , DF=df . 



Parameters are in keyword form; the only required parameter is DN. 

DN=(2w Local dataset name. The name the job will use to refer to 
the dataset while it remains local to the job. 1 through 7 
alphanumeric characters, the first of which is A through Z, 
$, @, or %; remaining characters can also be numeric. DN 
is a required parameter. 

SDH=sdn Staged dataset name. 1 through 15 alphanumeric 

characters. Name by which the dataset is known on the 
front end. The default for sdn is dn. 

DF=df Dataset format. This parameter defines whether a dataset 

is sent from the Cray Computer System in COS blocked format 
and whether the front-end system is to perform character 
conversion. The default is CB. 

For example, a user wishes to save a dataset on magnetic 
tape in blocked binary as it appears on COS mass storage. 
In this case, BB is specified. A user who wants a dataset 
printed can specify CB if the front-end computer handles 
deblocking. 

df is a 2-character alphanumeric code defined for use on 
the front-end system. Cray Research, Inc., suggests 
support of the following codes: 

CD Character deblocked. The front-end system performs 
character conversion to 8-bit ASCII, if necessary. 

CB Character blocked. The front-end system blocks the 
dataset before staging and performs character 
conversion to 8-bit ASCII, if necessary. 
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BD Binary deblocked. The front-end system does not 
perform character conversion. For FETCH, BD is the 
same as TR. 

BB Binary blocked. The front-end system blocks the 
dataset before staging but does not do character 
conversion. 

TR Transparent. No blocking/deblocking or character 
conversion is performed. 

Other codes can be added by the local site. Undefined 
pairs of characters can be passed but are treated as 
transparent mode by COS. 

MF=mf Mainframe computer identifier. 2 alphanumeric characters. 

The default is the front end of job origin. 

TID=tid Terminal identifier. 1 through 8 characters identifying 
destination terminal. The default is terminal of job 
origin where applicable. 

TEXT=text Text to be passed to the front-end system requesting 

transfer of a dataset. The format for TEXT is defined by 
the front-end system for managing its own datasets or 
files. Typically, text is in the form of one or more 
control statements for the front-end system; these 
statements must contain their own terminator for the front 
end. text cannot exceed 240 characters. 
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The following utility routines support permanent datasets: 

• PDSDUMP dumps all specified permanent datasets to a user-specified 
dataset. Input and output datasets can be included in the dump. 

• PDSLOAD loads permanent datasets that have been dumped by PDSDUMP 
and updates or regenerates the Dataset Catalog. Input and output 
datasets are also loaded through PDSLOAD. 

• AUDIT produces a report containing status information for each 
permanent dataset. AUDIT does not include input or output 
datasets. 

All of the permanent dataset utilities permit a shorthand notation for 
the arguments to the PDN (or PDS) , ID, US, and OWN parameters. Using 
this notatation, a dash represents any number of characters or no 
characters and an asterisk represents any one character. 



Examples : 

PDN=ABC- List all permanent dataset names beginning with ABC. 

PDN=A*** List all 4-character permanent dataset names beginning with 
A. 

PDN=-A*- List all permanent dataset names containing the letter A 
followed by one or more other characters. 

PDN=- List all permanent dataset names. 

PDN=***- List all permanent dataset names having three or more 
characters. 

When permanent dataset privacy is enabled, callers of these utilities are 
limited to actions on their own datasets unless the CW parameter is 
present on the control card. The OWN and NOWN parameters cannot be 
specified unless CW is also specified. When privacy is enabled, the US 
value from the JOB or ACCOUNT control statement is an implied dataset 
selection criterion, unless the CW parameter is present. When privacy is 
not enabled, the US value from the JOB or ACCOUNT control statement is 
not used as a selection criterion. CW must be specified if US is 
specified on the permanent dataset utility control statement. 
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PDSDUMP - DUMP PERMANENT DATASETS 

PDSDUMP dumps specified permanent datasets to a dataset that can be saved 
or staged to a station as desired. Characteristics and conditions that 
cause a dataset to be omitted from dumping include: 

• Execute-only dataset 

• Dataset allocation conflict 

• Catastrophic dataset error 

• Inconsistent dataset allocation 

• Device on which the dataset resides is down 

• Inactive dataset entry in the system's Queued Dataset Table (QDT) 



Format : 



JPDN) 
PDSDUMP , DU=dn , DV= Id v , j PDS j -pdn , ED=ed, CW=cw , lD=uid 




US s =usn,OWH=ov,imc=mm/dd/yyi 'hhxmrmss* , 




hRC=mm/dd/yy : t 'hhimm\ss x ,TS=opt,X,C,D,B,SO,l,0,S, 



All parameters are in keyword form. Optional parameters identify which 
datasets are to be dumped or not dumped. 

DN=dw Name of dataset to which dump is written. The default is 
$PDS. Multiple dumps to a dataset are possible; if the 
dataset specified already exists, the dump is appended to 
it. 

DV=ldv Dumps all datasets residing on logical device Idv. 
Currently only one Idv can be specified.*" Datasets 
can be limited by the B parameter. 

VDU=pdn Dumps all editions of the specified permanent dataset. 

or Editions can be limited by ED parameter. f 
PDS=pds 

ED=ed Edition number of permanent dataset dumped; meaningful 

only if PDS parameter is specified.^ 



t By default, all permanent datasets that could be specified by the 
parameters are dumped. 
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CW=cw Installation-defined control word regulating use of 

PDSDUMP. If the CW parameter is omitted, only the datasets 
belonging to the job owner can be dumped. If the CW 
parameter is present and the correct control word is used, 
any dataset can be dumped. If an invalid control word is 
given, the job step is aborted. 

ID=uid Dumps all datasets with additional user identification as 
specified.*" If ID is specified without a value, all 
datasets which meet the rest of the criteria and have a 
null ID are dumped. 

US=usn Dumps all datasets with specified user number. 

OWN=<?y Dumps all datasets with specified ownership value. 

IHC=mm/dd/yy x % hhimm:ss % 

Incremental dump. Dumps only datasets modified since the 
specified date and time. 

&RC=nvn/dd/yy t'hhirmmss' 

Archive datasets. Dumps and deletes datasets, regardless 
of the D option, that have not been accessed since the 
specified date and time. 

TS=opt Timestamp conversion option, opt may be: 

NS Writes timestamp in nanosecond (new) format. 
RT Writes timestamp in real-time clock (old) format. 
SAME Does not convert timestamp. 

CURR Writes timestamp in whatever format is the current 
system default for writing timestamps. 

If TS is not specified, TS=CURR is assumed. 

X Dumps expired datasets 

C Dumps selected datasets never dumped or datasets modified 
or adjusted since the last dump of the dataset 

D Deletes datasets that are dumped 

B Dumps only datasets that begin on the logical device 
specified by the DV parameter 

SO Performs selection only (suppress actual dumping or 
deleting) 



f By default, all permanent datasets that match the criteria specified 
by the parameters are dumped. 



SR-0011 11-3 M 



Dumps system input datasets 
Dumps system output datasets 
Dumps user permanent datasets 



See the following note. 



NOTE 

If none of these parameters is specified, the 
input, output, and user permanent datasets 
are all dumped. If any of these parameters 
is specified, only those datasets of the type 
specified are dumped. 



Multiple calls to PDSDUMP can be made if the dump dataset is to include 
several permanent datasets requiring specification of different 
parameters. 



Example : 

PDSDUMP , DN=DUMPA , PDS=LIB1 . 
PDSDUMP , DN=DUMPA , PDS=LIB2 . 

This example results in a dataset DUMPA that contains all editions of 
LIB1 and all editions of LIB2. 

PDSDUMP produces a listing (see figure 11-1) on $OUT identifying the 
datasets dumped or bypassed and summarizing the dump run. The date and 
time in the heading line refer to the time when the dump run started. 
The permanent dataset name, edition number, ID, and user number are 
extracted from the DSC entry for each dataset selected. Each message is 
followed by the notation DUMPED, DUMPED AND DELETED, or NOT DUMPED. The 
notation NOT DUMPED indicates the dataset was selected but could not be 
accessed for dumping. A user logfile message further explains the 
problem encountered. 

When dumping to a tape dataset, the recording format for the tape dataset 
must be transparent (for example, DF=TR on ACCESS statement). If the 
dataset is recorded in interchange format, loading of the dumped datasets 
cannot be performed. 
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PDSLOAD - LOAD PERMANENT DATASETS 

PDSLOAD loads permanent datasets from a dataset created by PDSDUMP. If 
any of the permanent datasets already exist on Cray mass storage, it is 
reloaded only if the RP parameter is present. 



PDSDUMP - PERMANENT DATASET DUMP UTILITY DUMP ON 



AUDPL 

AUDPL 

DSCED 

DSCED 

TXBUILD 

TXBUILD 

TXBUILD 

LONGDATASETNAME 

LONGDATASETNAME 

LONGDATASETNAME 

LONGDATASETNAME 

DSBUILD 

DSBUILD 

DSBUILD 

DSBUILD 

AUDPL 

DSCED 

TXBUILD 

AUDPL 

DSCED 

20 



ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0001 ID=QITTYQAT USR=SYSTEM 
ED=0002 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0003 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
ED=0004 ID=QITTYQAT USR=SYSTEM 
DATASETS SELECTED FOR DUMPING 



01/07/82 AT 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 
DUMPED 



14:50:44 



Figure 11-1. PDSDUMP listing 



Format : 



PDN 



PDSLOAD , L=ldn , DN^fn , \ pDS f -yds , ED=ed , CVl-ew , !D=uid , miD=nuid 





\3S=USYl , OWN=0V , HOmi=noV , BV=dvn , RP , CR , A , I , O , S , NA , SO , TLA . 
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All parameters are in keyword form. Optional parameters identify which 
datasets are to be loaded or not loaded. 

L=ldn List dataset name. The default is $OUT. 

DN=dn Name of dataset from which permanent datasets are to be 

loaded. The default is $PDS. 

'PXM^pdn Loads all editions of the specified permanent dataset. 
or Editions can be limited by the ED parameter.^ 

PDS=pdn 

ED-ed Edition number of dataset to be loaded; meaningful only if 

PDS parameter is specified. 

CW=cw Installation-defined control word regulating the use of 

PDSLOAD. If CW is omitted, only datasets belonging to the 
job owner are loaded. 

ID=uid Loads all datasets with additional user identification as 
specified 

HID=nuid Loads selected datasets with new user identification. 

This parameter is used to change the user identification of 
selected datasets. 

US=usn Loads all datasets with specified user number^ 

OWN=oy Loads all datasets with specified ownership value 

HOmi=nov Loads selected datasets to owner nov. This parameter is 

used to change the ownership value of the selected datasets, 

TN-dvn Name of logical device where the output dataset is 

assigned before it is opened. If omitted, COS assigns a 
device at open time. If this parameter is specified, the 
supplied device name is requested for the output dataset 
(the one being loaded) . Note that COS can choose not to 
honor this assignment (for example, the device might not be 
currently available) . This parameter is not involved in 
any way in the selection of a dataset for loading. 

RP If any of the specified datasets already exists, replaces 
with the one being loaded. 

CR Loads the most current version of a dataset, based on 

creation time. This option allows incremental loads to be 
performed in any order. 



t By default, all permanent datasets that could be specified by the 
parameters are loaded. 
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A Loads only active datasets; that is, does not load expired 
datasets. 

I Loads input datasets 

Loads output datasets } See the following note. 

S Loads saved datasets 



NOTE 

If none of these parameters is specified, the 
input, output, and saved datasets are 
loaded. If any of these parameters is 
specified, only those datasets of the type 
specified are loaded. 



NA Does not abort if there is not a dataset matching the 

specifications to load on the $PDS dataset. This parameter 
applies only to this situation. It does not prevent any 
other abort condition from occurring or offer reprieve 
processing of any kind. 

SO Performs selection only; suppresses actual loading of 
datasets. 

TLA Updates time of last access as the time that the load was 
performed. 

PDSLOAD produces a listing on the list dataset identifying the datasets 
loaded or bypassed and summarizing the load run (see figure 11-2) . The 
date and time in the heading line refer to the time when the load run 
started. The permanent dataset name, edition number, ID, and user number 
are extracted from the PDD for each dataset selected and successfully 
loaded. Each message is followed by the notation LOADED or NOT LOADED. 
The notation NOT LOADED indicates the dataset was selected but not 
loaded. An error message further explains the problem encountered. 
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PDSLOAD - 


- PERMANENT DATASET RESTORE UTILITY LOAD 


ON 


01/07/82 AT 17:13:47 


ENTIT 


ED=0001 ID=TAQI 


USR=SYSTEM 




LOADED 


DSBUILD 


ED=0001 ID=TAQI 


USR=SYSTEM 




LOADED 


TXBUILD 


ED=0001 ID=TAQI 


USR=SYSTEM 




LOADED 


AUDPL 


ED=0001 ID=TAQI 


USR=SYSTEM 




LOADED 


DSCED 


ED=0001 ID=TAQI 
5 DATASETS SELECTED 


USR=SYSTEM 
FOR LOADING 




LOADED 



Figure 11-2. PDSLOAD listing 



AUDIT - AUDIT PERMANENT DATASETS 

The AUDIT utility provides reports on the status of each permanent dataset 
known to the system. AUDIT does not include input and output datasets. 

If more than one parameter is selected, only those datasets which meet all 
criteria are listed. 

AUDIT supplies the following information on the listing: 



Permanent dataset name 

Dataset identifier 

Edition number 

User identifications 

Dataset size in words 

Retention time in decimal 

Number of accesses in decimal 

Public access mode 

Total block count in decimal 

Track access flag setting 



Creation date/time 

Last dump date/time 

Last access date/time 

Last modification date/time 

Device name 

note information 

text information 

Permitted users 

Access counts by user 

Number of datasets selected 
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M 



Format : 



AUDIT , L= Idn , B=bdn , PDU=pdn , ID=uid , \JS=usn , TN=dvn , SZ=dsz , 



ACC=op t 1 opt, X=mm/dd/yy i^hhinmiss* , TCR=mm/dd/yy x l 1ihirnmiss i , 



TLArwn/dd/yy : % hh\mmiss % ,TJM-rwn/dd/yy : x hhimmiss % ,CW=cw, 



OWN=oy , LO=opt : opt : opt : opt : opt , BO=opt : opt : opt : opt . 

Parameters are in keyword form. 

L=ldn List dataset name. The default is $OUT. 

B=bdn Name of dataset to receive the binary output. If B is 

specified alone, the dataset is $BINAUD. If the B 
parameter is omitted, no binary output is written. For a 
description of the binary output format, see the Binary 
Audit Table description in the COS Table Descriptions 
Internal Reference Manual, publication SM-0045. 

PDU=pdn Name of permanent dataset or datasets to be listed 

lH-uid List all permanent datasets with the specified additional 
user identification. The default is to list all IDs. If 
ID is present without an equated value, datasets having a 
null ID are selected. 

US=usn List all permanent datasets with the specified user 
number. The default is to list all user numbers. 

TN=dvn List all permanent datasets on the specified logical 

device. The default is to list permanent datasets on all 
devices. 

SZ=dsz List all permanent datasets greater than or equal to the 
specified size. Size is specified in words. The default 
is to list all sizes. 
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ACC=opt : opt 

Access option parameters. The options are: 

AM List only those datasets belonging to OWN which have 
an explicit permit for the job's ownership value. 

PAM List only those datasets belonging to OWN which 
have any form of public access (R:W:M:E) . 

If the OWN parameter is omitted, all datasets are searched 
for the permit or public access. If the CW parameter is 
specified, the AM includes any permit for any owner value. 
If the OWN parameter is specified and the CW and ACC 
parameters are omitted, AUDIT assumes the ACOAM:PAM 
parameter on the control statement. 

YJ=mm/dd/yy z ' hh zmmzss ' 

List all permanent datasets expired as of the specified 
mm/dd/yy z'hh zmmzss* . mm/dd/yy can be specified alone. The 
default expiration date and time are "now" if only X is 
specified. 

TCR^mm/dd/yy : ■ hh zmmz ss * 

List all permanent datasets that have been created since the 
specified mm/dd/yy z'hh zmmzss* . The keyword cannot be 
specified alone; however, TCR=mm/dd/yy is sufficient. 

TlA=mm/dd/yy z'hhzmmzss* 

List all permanent datasets that have not been accessed 
since the specified mm/dd/yy z'hhzmmzss* . The keyword cannot 
be specified alone; however, TLA-mm/dd/yy is sufficient. 

TlM-mm/dd/yy z* hit zmmzss* 

List all permanent datasets that have been modified since 
the specified mm/dd/yy z *hhzmmzss* . The keyword cannot be 
specified alone; however, TIM=mm/dd/yy is sufficient. 

CW=cw Installation-defined control word regulating use of 

AUDIT. If the CW parameter is omitted, only the datasets 
belonging to the job owner can be listed. If the CW 
parameter is present and the correct control word is used, 
any dataset can be listed. If an invalid control word is 
given, the job step is aborted. When the CW and ACC 
parameters are omitted, but the OWN parameter is specified, 
AUDIT assumes the ACC=AM:PAM parameter on the control 
statement . 

OWN=e>y List all permanent datasets with the specified ownership 

value. If OWN is not specified, the job's ownership value 
is used. 
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Output formatting parameters: 

UO=opt:opt:opt:opt:opt 

Listing option selection. The options are: 

S Short list which includes PDN, ID, and ED listed two 
per line. This is the default for interactive jobs 
when LO is not specified. This list option cannot be 
mixed with any others. 

The following options can be specified alone or in 
combination separated by colons: 

L Long list which includes PDN, ID, ED, size in words, 
retention time, access count, track access flag, public 
access mode, creation, last access, last modification, 
last dump time, and device name. L is the default for 
batch jobs when LO is not specified. 

P Permit list which includes permitted owner name, access 
mode, access count, time of last access, and time of 
permit creation 

A Access tracking which includes accessing owner name, 
access count, time of last access, and time of first 
access 

T Text list which displays the dataset catalog text 
field 

N Notes list which displays the dataset catalog notes 
field 

BO-opt : opt : opt : opt 

Binary audit options. These options specify what 
additional information, if any, is to be added to the 
standard binary audit file. They are ignored without 
comment unless a binary audit is requested (via the B 
parameter) . If more than one option is desired, separate 
them with colons. The options are: 

P Permits; one permit record is generated for each 
permitted user for each selected dataset. 

A Access tracking; one record is generated for each 
accessing user for each selected dataset. 

T Text; one record is generated for each selected dataset 
that has text. 

N Notes; one record is generated for each selected 
dataset that has notes* 
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Figures 11-3 through 11-7 illustrate some of the LO options as they appear 
when the listing is directed to a mass storage dataset. Interactive 
reports omit the page header line. Non-private systems suppress the owner 
line unless OWN is used as a control statement parameter. 



AUDIT 



COS 1.12 



05/24/83 12:35:33 
OWN » UVWXY 



PAGE 



PDN 



ID 



ED 



PDN 



ID 



ED 



$DEBUG 


DJB 




1 


$DS 


DJB 


5 


$OVL 


DJB 




5 


ARCHIVE 


DJB 


1 


ARCHIVE 


DJB 




2 


AUDIT 


DJB 


1 


COSNL 


DJB 




1 


ISAMPL 


DJB 


1 


PROFILE 


DJB 




1 








9 


DATASETS , 


3099 


BLOCKS , 




1585585 WORDS 





Figure 11-3. AUDIT, LO=S listing 
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11-12 



M 



AUDIT 

OWN = UVWXY 
ID = DJB 



COS 1.12 



05/24/83 12:35:45 



PAGE 



PERMITTED USERS FOR PDN = ARCHIVE ID = DJB 

USER AM ACC LAST ACCESS CREATED 



XYZ 


RWM 











05/16/83 12:09:09 


ABCD 


R 











05/20/83 06:46:13 


QRZX 


RW 











05/20/83 06:46:28 


ZILCH 


E 











05/20/83 06:46:49 


PERMITTED USERS 


FOR PDN 


« ARCHIVE 




ID 


= DJB 


USER 


AM 




ACC LAST 


ACCESS 




CREATED 


XYZ 


RWM 











05/16/83 12:09:09 


ABCD 


R 











05/20/83 06:46:13 


QRZX 


RW 











05/20/83 06:46:28 


ZILCH 


E 











05/20/83 06:46:49 


9 DATASETS, 


3099 


BLOCKS, 


1585585 WORDS 



Figure 11-4. AUDIT, LO=P listing 
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M 



AUDIT 

OWN = UVWXY 
ID » DJB 



COS 1.12 



05/24/83 12:36:10 



PAGE 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



$DEBUG DJB 1 05/16/83 05/16/83 
5574 45 4 N RWM 11:47:36 12:22:27 



05/20/83 DD-A1-24 
06:02:22 



$DS DJB 5 03/29/83 05/18/83 05/14/83 05/20/83 DD-A2-20 

4608 45 7 N N 10:45:29 14:27:09 15:08:22 06:03:00 

NOTES: 

THE FOLLOWING NOTES LINE IS MORE THAN 72 CHARACTERS IN LENGTH. 

123456789012345678901234567890123456789012345678901234567890123456789012 

34567890 

THE NEXT LINE IS ONLY ONE CHARACTER LONG. 

1 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



$OVL 



39424 
NOTES: 
SAMPLE NOTES DXT 



DJB 5 03/29/83 05/14/83 

45 6 N RWM 10:45:29 17:15:38 



05/20/83 DD-A1-21 
06:05:29 



PDN ID ED LAST LAST LAST DEVICE 

SZ RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



ARCHIVE DJB 1 05/12/83 05/20/83 
4096 45 4 N RWM 11:18:10 06:44:22 



05/20/83 DD-A1-24 
06:04:01 



PERMITTED USERS: 



Figure 11-5. AUDIT, LO=L:P:N listing 
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11-14 



M 



AUDIT 


COS 


1.12 




05/24/83 1 


OWN = UVWXY 










USER 




AM 


ACC 


LAST ACCESS 


XYZ 




RWM 







ABCD 




R 







QRZX 




RW 







ZILCH 




E 








PAGE 



CREATED 

05/16/83 12:09:09 
05/20/83 06:46:13 
05/20/83 06:46:28 
05/20/83 06:46:49 



PDN 



SZ 



ID ED LAST LAST LAST 

RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



ARCHIVE DJB 2 05/20/83 05/20/83 

3671 45 IN RWM 06:45:12 06:45:12 



05/20/83 DD-A2-21 
17:08:48 



PERMITTED USERS: 



USER 


AM 


ACC 


LAST ACCESS 


CREATED 


XYZ 


RWM 







05/16/83 12:09:09 


ABCD 


R 







05/20/83 06:46:13 


QRZX 


RW 







05/20/83 06:46:28 


ZILCH 


E 







05/20/83 06:46:49 



PDN 



SZ 



ID ED LAST LAST LAST 

RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



AUDIT 



26467 



DJB 1 05/24/83 05/24/83 

45 3 N RWM 10:13:33 12:35:30 



DD-A1-22 



COSNL DJB 1 04/06/83 04/07/83 

1498112 45 3 N RWM 11:28:00 09:41:58 



05/20/83 DD-A2-20 
06:05:04 



ISAMPL 

3584 

PROFILE 

49 



DJB 1 08/11/81 04/22/83 03/03/83 05/20/83 DD-A2-20 
100 24 N RWM 10:07:41 17:21:54 10:02:58 06:04:46 



DJB 1 04/30/83 05/24/83 
45 52 N RWM 14:10:28 10:13:32 



05/20/83 DD-A2-21 
06:02:54 



9 DATASETS, 



3099 BLOCKS, 



1585585 WORDS 



Figure 11-5. AUDIT, LO=L:P:N listing (continued) 



SR-0011 



11-15 



M 



AUDIT 



COS 1.12 



05/24/83 12:35:37 



PAGE 



OWN = UVWXY 
ID ■ DJB 



PDN 



SZ 



ID ED LAST LAST LAST 

RT ACC TA PAM CREATED ACCESSED MODIFIED DUMPED 



DEVICE 



$DEBUG 

5574 


DJB 
45 


4 


N 


1 
RWM 


05/16/83 
11:47:36 


05/16/83 
12:22:27 


$DS 


DJB 






5 


03/29/83 


05/18/83 


4608 


45 


7 


N 


N 


10:45:29 


14:27:09 


$OVL 

39424 


DJB 
45 


6 


N 


5 

RWM 


03/29/83 
10:45:29 


05/14/83 
17:15:38 


ARCHIVE 

4096 


DJB 
45 


4 


N 


1 
RWM 


05/12/83 
11:18:10 


05/20/83 
06:44:22 


ARCHIVE 

3671 


DJB 
45 


1 


N 


2 

RWM 


05/20/83 
06:45:12 


05/20/83 
06:45:12 


AUDIT 

26467 


DJB 
45 


3 


N 


1 
RWM 


05/24/83 
10:13:33 


05/24/83 
12:35:30 


COSNL 

1498112 


DJB 
45 


3 


N 


1 
RWM 


04/06/83 
11:28:00 


04/07/83 
09:41:58 


ISAMPL 

3584 


DJB 
100 


24 


N 


1 
RWM 


08/11/81 
10:07:41 


04/22/83 
17:21:54 


PROFILE 

49 


DJB 
45 


52 


N 


1 
RWM 


04/30/83 
14:10:28 


05/24/83 
10:13:32 



05/20/83 DD-A1-24 
06:02:22 

05/14/83 05/20/83 DD-A2-20 
15:08:22 06:03:00 

05/20/83 DD-A1-21 
06:05:29 

05/20/83 DD-A1-24 
06:04:01 

05/20/83 DD-A2-21 
17:08:48 

DD-A1-22 



05/20/83 DD-A2-20 
06:05:04 

03/03/83 05/20/83 DD-A2-20 
10:02:58 06:04:46 

05/20/83 DD-A2-21 
06:02:54 



9 DATASETS, 



3099 BLOCKS, 



1585585 WORDS 



Figure 11-6. AUDIT, LO=L listing 



SR-0011 



11-16 



M 



AUDIT COS 1.12 05/24/83 12:35:53 PAGE 

OWN = UVWXY 
ID = DJB 

NOTES FOR PDN = $DS ID - DJB ED = 5 

THE FOLLOWING NOTES LINE IS MORE THAN 72 CHARACTERS IN LENGTH. 

123456789012345678901234567890123456789012345678901234567890123456789012 

34567890 

THE NEXT LINE IS ONLY ONE CHARACTER LONG. 

1 

NOTES FOR PDN = $OVL ID = DJB ED ■ 5 

SAMPLE NOTES DXT 

9 DATASETS, 3099 BLOCKS, 1585585 WORDS 



Figure 11-7. AUDIT, LO=N listing (AUDIT, LO=T is nearly identical) 
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LOCAL DATASET UTILITIES 12 



Local dataset utilities provide the user with a convenient means of 
copying, positioning, or initializing local datasets. The following 
utilities are available to the user: 

• COPYR, COPYP, and COPYD copy blocked records, files, and datasets, 
respectively. 

• COPYU copies unblocked datasets. 

• SKIPR, SKIPP, and SKIPD skip blocked records, files, and datasets, 
respectively. 

• SKIPU skips sectors on unblocked datasets. 

• REWIND positions a blocked or unblocked dataset at the beginning 
of data, that is, before the first word of the dataset. 

• WRITEDS initializes a blocked random or sequential dataset. 



COPYR - COPY BLOCKED RECORDS 

The COPYR utility copies a specified number of records from one blocked 
dataset to another starting at the current dataset position. Following 
the copy, the datasets are positioned after the EOR for the last record 
copied. The COPYR control statement is described below. 



Format : 



COPYR, l=idn , O=odn , NR*=« . 



Parameters are in keyword form. 

I=idn Name of dataset to be copied. The default is $IN. 

0=odn Name of dataset to receive the copy. The default is $OUT. 
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UR=n Decimal number of records to copy. The default is 1. If 

the dataset contains fewer than n records, the copy 
terminates on the next EOF. EOF or EOD is not written. If 
the keyword NR is specified without a value, the copy 
terminates at the next EOF. If the input dataset is 
positioned midrecord, the partial record is counted as one 
record. 



COPYF - COPY BLOCKED FILES 

The COPYF utility copies a specified number of files from one blocked 
dataset to another starting at the current dataset position. Following 
the copy, the datasets are positioned after the EOF for the last file 
copied. The COPYF control statement is described below. 



Format: 



COPYF , I=idn , O-odn , NF=rc . 



Parameters are in keyword form. 

I=idn Name of dataset to be copied. The default is $IN. 

0=odn Name of dataset to receive the copy. The default is $OUT. 

UF=n Decimal number of files to copy. The default is 1. If the 

dataset contains fewer than n files, the copy terminates 
on EOD. EOD is not written. If the keyword NF is 
specified without a value, the copy terminates at the EOD. 
If the input dataset is positioned midfile, the partial 
file counts as one file. 



COPYD - COPY BLOCKED DATASET 

The COPYD utility copies one blocked dataset to another starting at their 
current positions. Following the copy, both datasets are positioned 
after the EOF of the last file copied. The EOD is not written to the 
output dataset. 
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Format: 



COP YD , I=idn , 0=odn . 



Parameters are in keyword form. 

I-idn Name of dataset to be copied. The default is $IN. 

0~odn Name of dataset to receive the copy. The default is $OUT, 



COPYU - COPY UNBLOCKED DATASETS 

The COPYU utility copies a specified number of sectors or all data until 
EOD. The copy is made to or from the current position on both datasets. 
At the end of the copy, the datasets remain positioned after the last 
sector copied. The COPYU control statement is described below. 



Format : 



COPYU, I=i , 0=*? , NS=rcs . 



Parameters are in keyword form. 

I=£ Name of unblocked dataset to be copied. 

0=0 Name of unblocked dataset to receive the copy. 

HS=ns Decimal number of sectors to copy. The default is 1. 

If the unblocked dataset contains fewer than ns sectors, 
the copy terminates on EOD. If the keyword ns is 
specified without a value, the copy terminates at EOD 
also. 

Parameters I and are required, and no default is given for them. 
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SKIPR - SKIP BLOCKED RECORDS 

The SKIPR utility directs the system to bypass a specified number of 
records from the current position of the named blocked dataset. The 
SKIPR control statement is described below. 



Format : 



SKIPR, DN=*fa,NR=rc. 



Parameters are in keyword form. 

DH=dn Name of dataset to be bypassed. The default is $IN. 

HR=n Decimal number of records to skip. The default is 1. If 

the keyword NR is specified without a value, the system 
positions dn after the last EOR of the current file. If 
n is negative, SKIPR skips backward on dn. If dn is 
positioned in the middle of the record, the partial record 
skipped counts as one record. 

SKIPR does not bypass an EOF or beginning-of-data. If an 
EOF or beginning-of-data is encountered before n records 
have been bypassed when skipping backward, the dataset is 
positioned after the EOF or beginning-of-data. When 
skipping forward, the dataset is positioned after the last 
EOR of the current file. This statement is available for 
use with online tapes except that a negative value cannot 
be used for NR. 



SKIPF - SKIP BLOCKED FILES 

The SKIPF utility directs the system to bypass a specified number of 
files from the current position of the named blocked dataset. The SKIPF 
control statement is described below. 



Format : 



SKIPF , DN=rfrc , NF=rc . 
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Parameters are in keyword form. 

DH=dn Name of dataset to be bypassed. The default is $IN. 

NF=?i Decimal number of files to bypass. The default is 1. If 
the keyword NF is specified without a value, the system 
positions dn after the last EOF of the dataset. If n 
is negative, SKIPF skips backward on dn. 

If dn is positioned midfile, the partial file skipped 
counts as one file. 

SKIPF does not bypass an EOD or beg inning-of -data. If 
beg inning-of -data is encountered before n files have been 
bypassed when skipping backward, the dataset is positioned 
after the beginning-of-data. When skipping forward, the 
dataset is positioned before the EOD of the current file. 
This statement is available for use with online tapes 
except that a negative value cannot be used for NF; for 
interchange format tapes (DF=IC) , NF can only be 1. 

For example, if dn is positioned just after an EOF, the 
following control statement positions dn after the 
previous EOF. If dn is positioned midfile, dn will be 
positioned at the beginning of that file. 

SKIPF , DK=dn , NF=-1 . 



SKIPD - SKIP BLOCKED DATASET 

The SKIPD utility directs the system to position a blocked dataset at 
EOD, that is, after the last EOF of the dataset. It has the same effect 
as the following statement: 

SKIPF, DN=^,NF. 

If the specified dataset is empty or already at EOD, the statement has no 
effect. The SKIPD control statement is described below. 



Format : 



SKIPD, DN=drc. 
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The parameter is in keyword form. 

DU=dn Name of dataset to be skipped. The default is $IN. 



SKIPU - SKIP UNBLOCKED DATASET 

The SKIPU utility directs the system to bypass a specified number of 
sectors or all data from the current position of the named unblocked 
dataset. The SKIPU control statement description follows. 



Format : 



SKIPU, DU=dn,HS=ns. 



Parameters are in keyword form. 

DH=dn Name of unblocked dataset to be bypassed. There is no 

default value. 

NS=ns Decimal number of sectors to bypass. The default is 1. If 
the keyword NS is specified without a value, the system 
positions dn after the last sector of the dataset. If 
ns is negative, SKIPU skips backwards on dn. 



REWIND - REWIND BLOCKED OR UNBLOCKED DATASET 

The REWIND control statement positions the named datasets at the 
beginning-of-data. The $IN dataset represents an exception. After 
REWIND, $IN is positioned after the control statement file. REWIND opens 
any of the named datasets that are not open. REWIND is a system verb. 

REWIND causes an EOD to be written to the dataset if the previous 
operation was a write or if the dataset is null. If the dataset is not 
memory resident, the buffers are flushed to mass storage when REWIND 
follows a write operation. If the dataset is memory resident, the EOD is 
still placed in the buffer, but the buffer is not flushed. For an online 
magnetic tape dataset, REWIND positions the tape dataset to the beginning 
of the first volume accessed by the user. 
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Format : 



REWIND , DN=*2«i idri2 : . . . idriQ, 



Parameters are in keyword form. 

DH=dni Names of datasets to be rewound. A maximum of eight 
datasets can be specified, separated by colons. 



WRITEDS - INITIALIZE A BLOCKED RANDOM OR SEQUENTIAL DATASET 

The WRITEDS utility is intended for initializing a blocked dataset. It 
writes a dataset containing a single file consisting of a specified 
number of records of a specified length. This utility is especially 
useful for random datasets because a record written on a random dataset 
must end on a pre-existing record boundary. Direct-access datasets, 
implemented in CFT as defined by the ANSI X3. 9-1978 FORTRAN standard, can 
be initialized, and even extended, without the help of WRITEDS. 

WRITEDS can also be used to write a sequential dataset. 

The WRITEDS control statement is described below. 

Format : 



WRITEDS , DH=dn , URrmr , RL=rZ . 



Parameters are in keyword form; the only required parameters are DN and 
NR. 

DH=dn Name of dataset to be written. DN is a required parameter. 

NR=rcz» Decimal number of records to be written. NR is a required 
parameter set to the largest value that may be needed, 
since a dataset is generally not extended when it is in 
random mode. 

RL=rl Decimal record length, that is, the number of words in each 

record. The default is zero words, which generates a null 
record . 

If the record length is 1 or greater, the first word of 
each record is the record number as a binary integer 
starting with 1. 
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ANALYTICAL AIDS 13 



The following utilities provide analytical aids to the programmer: 

• DUMPJOB and DUMP are generally used together to examine the 
contents of registers and memory as they were at a specific time 
during job processing. DUMPJOB captures the information so that 
DUMP can later format selected parts of it. 

• DEBUG produces a symbolic dump. 

• DSDUMP dumps all or part of a dataset to another dataset. The 
input dataset may be either blocked or unblocked. 

• COMPARE compares two datasets and lists all differences. 

• FLODUMP dumps flowtrace tables when a program aborts with 
flowtrace active. 

• PRINT writes the value of an expression to the logfile. 

• FTREF generates information about a FORTRAN application. 

• SYSREF generates a global cross-reference listing for a group of 
CAL or APML programs. 

• ITEMIZE inspects library datasets and generates statistics about 
them. Libraries are described in section 5; library dataset 
management is described in section 15. 



DUMPJOB - CREATE $DUMP 

The DUMPJOB control statement causes creation of the local dataset $DUMP, 
if not already existent. $DUMP receives an image of the memory assigned 
to the job (JTA and user field) when the DUMPJOB statement is 
encountered. Placing the DUMPJOB statement after a system verb, 
excluding the comment and EXIT statements, causes a dump of the Control 
Statement Processor (CSP) . A DUMPJOB statement is not honored if an 
execute-only dataset is loaded in memory; a DUMPJOB to an execute-only 
dataset is rejected. 
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If the $DUMP dataset already exists, it is overwritten each time a 
DUMPJOB control statement is processed. If $DUMP is permanent and the 
job does not have write permission, DUMPJOB aborts. If $DUMP is 
permanent and the job has write permission, the dataset is overwritten. 

If the DUMP JOB/DUMP sequence fails because of such situations as 
destroyed system-managed Dataset Parameter Areas, assign $DUMP before the 
job step for which the dump is to be written and save it with unique 
access. DUMPJOB writes to $DUMP, and job termination automatically 
adjusts $DUMP. $DUMP can then be inspected in a separate job. 

$DUMP is created as an unblocked dataset by DUMPJOB for use by DUMP. 
DUMPJOB is a system verb and cannot be continued to subsequent statements. 



Format: 



DUMPJOB. 



Parameters: None 



DUMP - DUMP REGISTERS AND MEMORY 

The DUMP utility reads and formats selected parts of the memory image 
contained in $DUMP and writes the information onto another dataset. The 
DUMP control statement can be placed anywhere in the control statement 
file after $DUMP has been created by the DUMPJOB control statement. 

Placing the DUMPJOB and DUMP statements after an EXIT statement is 
conventional and provides the advantage of giving the dump regardless of 
which part of the job causes an error exit. The usage of DUMP and 
DUMPJOB, however, is not restricted to this purpose. 

DUMP can be called any number of times within a job. This might be done 
to dump selected portions of memory from a single $DUMP dataset or it 
might be done if $DUMP has been created more than once in a single job. 



Format : 



DUMP , iHdn , Q=odn , FWA^a , LWA=2a?a , JTA, NXP, V, DSP , FORMAT=f , CENTER. 
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Parameters are in keyword form. 

I=idn Name of the dataset containing the memory image. The 

dataset $DUMP is created by DUMPJOB and is the default, but 
any dataset in the $DUMP (unblocked) format is acceptable. 

0=odn Name of the dataset to receive the dump; default is $OUT. 

"SMh-fwa First word address of memory to dump. The default is word 
of JCB. 

LWA=Zwa Last word address of memory to dump. The default is word 
200 of JCB. Specifying the keyword LWA without a value 
causes the limit address to be used. Specifying LWA=0 
causes no memory to be dumped. 

JTA Job Table Area to be dumped. The default is no JTA dump. 

NXP No Exchange Package, B registers, T registers, cluster 
registers, or semaphore registers dumped. The default 
causes Exchange Package, B registers, T registers, cluster 
registers, and semaphore registers to be dumped. Cluster 
registers and semaphore registers are available only on 
CRAY X-MP mainframe types. NXP overrides the V parameter 
if the two are used together. 

V Vector registers to be dumped. The default is no dump of V 
registers. 

DSP Logical File Tables (LFTs) and Dataset Parameter Tables 

(DSPs) to be dumped. The default is to not dump LFTs and 
DSPs. 

FORMAT 55 / Format for the part of memory selected by FWA and LWA. 

The first six of the following options are appropriate for 
formatting a dump of data. The I format is for a dump of 
of program instructions only. 

O Octal integer and ASCII character. This is the 
default. 

D Decimal integer and ASCII character 

X Hexadecimal integer and ASCII character 

G Floating-point or exponential, depending on the value 
of the number, and ASCII character 

P 16-bit parcel (4-word boundaries are forced for FWA 
and LWA) 
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M Mixed hexadecimal and octal written in ASCII. Each 
16-bit parcel is represented as five characters; the 
first character is a hexadecimal digit representing 
the high-order 4 bits, and the next four are octal 
characters representing the low-order 12 bits. 

I Instruction format. CAL instruction mnemonics printed 
with ASCII characters 

CENTER Dump 100 (octal) words on each side of the address in the 
P register of the Exchange Package. The format is P. 



Examples : 

The following example is a portion of a data dump obtained using format 
0, the default format type: 



*** Dump of memory from 00000000 to= 00000200 *** Format is 
*** Print Bias is: 00010000 *** 

******* Addresses from: 00000000 To: 00000077 Contain the same following pattern: 0000000000000000000000 
0000100 0405031464200000000000 0334000213400102175000 0000050215500002154200 0000213710500002154136 AC3D 
0000104 0000010000375351600000 1144507000650140022000 0415172462013013430465 0000000000000000000000 
0000110 0000000000000000000000 0000000000000000000000 0000000000000000000000 0374400000000000000000 
0000114 0000240000000000000000 0000000000000000655540 0000052712040000000002 0000000000040000141520 
0000120 0000000000000001256241 oooooooooooooooooooooo 0000000000000000000000 0000000000000000000000 
0000124 0000000000000000000000 0000000000000000000000 0000010000000000000000 0000000000000001771753 
0000130 0000000005200000000124 0000077476540001771753 0000000000000000000000 0000000000000000000000 T 

0000134 oooooooooooooooooooooo oooooooooooooooooooooo oooooooooooooooooooooo oooooooooooooooooooooo 



******* 



( A $ COS X.15 

[ \ 



The same portion of tone dump in format D: 



*** Dump of memory from 00000000 to= 

*** Print Bias is: 

******* Addresses from: 00000000 To: 



00000200 *** Format is D 
00010000 *** 
00000077 Contain the 



0000100 4702658803055722496 

0000104 281508995072000 

0000110 

0000114 5629499534213120 

0000120 351393 

0000124 

0000130 360777252948 

0000134 



3963177258470406656 

-7410426839300037632 



220000 





2238515480359915 





same following pattern: 

1417107280025728 

4850186722084794677 



1509221443043330 



281474976710656 







oooooooooooooooooooooo 

4922006751991902 AC3D 



4548635623644200960 

4295017296 



521195 

T 




******* 



( A $ COS X.15 
[ \ 



The same portion of the dump in format X: 



*** Dump of memory from 00000000 to= 
*** Print Bias is: 

******* Addresses from: 00000000 To: 
0000100 4143334400000000 
0000104 00010007EBA70000 
0000110 0000000000000000 
0000114 0014000000000000 
0000120 0000000000055CA1 
0000124 0000000000000000 
0000130 0000005400000054 
0000134 0000000000000000 



00000200 *** Format is X 
00010000 *** 

00000077 Contain the same following pattern: 

370008B80108FA00 0005O8DA0008D880 

9928E00D41 802400 434F5320582E3135 

0000000000000000 0000000000000000 

00000O0000O35B60 00055CA1 00000002 

0000000000000000 0000000000000000 

0000000000000000 000 1 000000000000 

0007F3EB0007F3EB 0000000000000000 

0000000000000000 0000000000000000 



oooooooooooooooooooooo 

00117C8A0008D85E AC3D 

0000000000000000 

3F20000000000000 

0OO0OO01OOO0C350 

0000000000000000 

000000000007F3EB 

0000000000000000 T 

0000000000000000 



******* 



( A $ COS X.15 

1 

I \ 
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The same portion of the dump in format G: 



♦** Dump of 
♦** Print B 
♦*####■» Add 

)000100 
)000104 
)000110 
J000114 
J000120 
)000124 
)000130 
)000134 



memory from 00000000 

i a s is: 

resses from: 00000000 
0.342195969964E+97 
0.000000000000E+00 
0.000000000000E+00 
0.000000000000E+00 
0.000000000000E+00 
0.000000000000E+00 
0.000000000000E+00 
O.OOOOOOOOOOOOE+OO 



to= 00000200 *** Format is G 

00010000 *** 
To: 00000077 Contain the same following pattern 



0. 910133366849-695 
0.000O00000000E+0O 
0.OO0O00O0OOO0E+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 



O.OOOOOOOOOOOOE+OO 
0. 304722870097+255 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+OO 



0000000000000000000000 
O.OOOOOOOOOOOOE+OO AC3D 
O.OOOOOOOOOOOOE+00 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+00 
O.OOOOOOOOOOOOE+OO 
O.OOOOOOOOOOOOE+00 
O.OOOOOOOOOOOOE+OO T 
O.OOOOOOOOOOOOE+00 



*#####* 



( A $ COS X.15 

1 

[ \ 



The same portion of the dump in format P: 



■** Dump of memory from 00000000 to= 00000200 *** Format is P 

** Print Bias is: 00010000 *** 

■**##** Addresses from: 00000000 To: 00000077 Contain the same following pattern: 



1000100 040503 031504 000000 000000 

1000102 000005 004332 000010 154200 

1000104 000001 000007 165647 000000 

1000106 041517 051440 054056 030465 

000110 000000 000000 000000 000000 

000112 000000 000000 000000 000000 

000114 000024 000000 000000 000000 

000116 000005 056241 000000 000002 

1000120 000000 000000 000005 056241 



033400 004270 000410 175000 AC3D 

000021 076212 000010 154136 

114450 160015 040600 022000 

000000 000000 000000 000000 COS X.15 

000000 000000 000000 000000 

037440 000000 000000 000000 ? 

000000 000000 000003 055540 

000000 000001 000000 141520 \ 

000000 000000 000000 000000 \ 



0000000000000000000000 



######* 



( A $ 



The same portion of the dump in format M: 



** Dump of memory from 00000000 to= 
■** Print Bias is: 

■#*#*** Addresses from: 00000000 To: 

1000100 4143334400000000 

1000102 000508DA0008D880 

1000104 00010007EBA70000 

000106 434F5320582E3135 

000110 0000000000000000 

000112 0000000000000000 

000114 0014000000000000 

000116 00055CA1 00000002 

000120 0000000000055CA1 

000122 0000000000000000 



00000200 *** Format 

00010000 *** 

00000077 Contain the 

370008B80108FAOO 

00117C8A0008D85E 

9928E00D41 802400 

0000000000000000 

0000000000000000 

3F20000000000000 

OOOOO00OOOO35B60 

00O0OO01OO0OC350 

0000000000000000 

0000000000000000 



is M 

same following pattern; 

040503 1 464200000000000 

000005021 55000021 54200 

0000010000375351600000 

0415172462013013430465 

0000000000000000000000 

0000000000000000000000 

0000240000000000000000 

0000052712040000000002 

0000000000000001 256241 

0000000000000000000000 



0000000000000000000000 ******* 
0334000213400102175000 AC3D 1 
0000213710500002154136 
1 144507000650140022000 
0000000000000000000000 COS X.15 
0000000000000000000000 
0374400000000000000000 ? 
0000000000000000655540 
0000000000040000141520 \ 
0000000000000000000000 \ 
0000000000000000000000 



( A $ 



A dump of program instructions in format I: 



****** Addresses from: 02154757 To: 02154776 Contain the same following pattern: 0000000000000000000000 ******* 

0000000000000000000000 

0000000000000000040777 A 

0605542667653026054530 a I [ JXXYX 

0645512301243000200363 ML 

0401000000641202101600 @@ 

0000044054000000231065 25 

0100010017546061225370 * 

1210000000043400200406 



2154777a 


ERR 


000 




ERR 


000 


2155000a 


ERR 


000 




ERR 


000 


2155001a 








S1 


SK30 


2155002a 


S5 


S5*FS1 




JSZ 


40074d 


2155003a 


S1 


15 




J 


B10 


2155004a 






2155005a 


JAZ 


40076d 




A3 


0+A5 


2155006a 


SO 


1,A1 




JSP 


40101c 



ERR 


000 


ERR 


000 


ERR 


000 


S7 


17660554 


S5 


S5>03 


S5 


S5<30 


SO 


S2\S5 


A6 


4,A1 


A3 


1,A1 


AO 


A6-A5 



A3 
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DEBUG - PRODUCE SYMBOLIC DUMP 

The symbolic debug utility, DEBUG, provides a means of dumping 
portions of memory and interprets the dump in terms of FORTRAN or CAL 
symbols. DEBUG is normally used after an EXIT, DUMPJOB sequence when 
a job step aborts, but it can be used anywhere provided that a valid 
version of $DUMP exists. 

In order for DEBUG to display variables, CFT and CAL must write 
special tables which the loader (LDR) augments with a version of the 
load map. The loader writes this information on a dataset called 
$DEBUG, which gives the FORTRAN or CAL symbol names associated with 
memory addresses. Table creation is initiated by specifying the ON=Z 
option for CFT or the SYM option for CAL. DEBUG reads $DEBUG and 
$DUMP and prints out variable names and values in a format appropriate 
for the variable type. 

The following example shows the conventional use of DEBUG: 

JOB, ... . 

CFT,ON=Z. 

LDR. 

EXIT. 

DUMPJOB. 

DEBUG. 



Whether or not $DEBUG is present, DEBUG lists the status of job 
datasets and, for a multitasking program, the status of all existing 
tasks. Multitasking, stack, and heap statistics are reported whenever 
they are available. 

The library routine SYMDEBUG is called from either FORTRAN or CAL with 
one argument, which is a Hollerith string containing any of the DEBUG 
parameters. SYMDEBUG produces output similar to that produced by DUMP 
but interprets the memory of the running program rather than $DUMP. 
It also uses the $DEBUG dataset. SYMDEBUG does not report the status 
of existing tasks or any statistics. 

Neither DEBUG nor SYMDEBUG works with overlays or segmented loads. 

The SYMS, NOTSYMS, BLOCKS, and NOTBLOCKS parameters permit a shorthand 
notation for the arguments specified. Using this notatation, a dash 
represents any number of characters or no characters and an asterisk 
represents any one character. 
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Examples: 

SYMS=ABC- Dump all symbols beginning with ABC. 

SYMS=A*** Dump all 4-character symbols beginning with A. 

SYMS=-A*- Dump all symbols containing the letter A followed by one or 
more other characters. 

SYMS=- Dump all symbols. 

SYMS=***- Dump all symbols having three or more characters. 

Format: 



DEBUG, I=idn , 0=odn , D\MP=ddn , TRACE=rc , sms=sym, HOTSms=nysm, BLOCKS=blk , 



NOTBLKS=nblk ,MAXDm=dim, TASKS , PAGES=rcp, COMMENTS=' string' . 



Parameters are in keyword form. 

1-idn Name of dataset containing debug symbol tables. The 

default is $DEBUG, which is created by the loader from the 
symbol tables produced by CFT and CAL. 

0=odn Name of dataset to receive the listing output from the 

symbolic debug routine. The default is $OUT. 

D\MP=ddn Name of dataset containing the dump of the user field. 

This dataset is created by the DUMPJOB control statement. 
ddn is used when the symbolic debug routine is invoked 
after an abort. The default is $DUMP. 

TRACE=rt Number of routine levels to be looked at in symbolic dump. 
DEBUG traces back through the active subprograms the number 
of levels specified by n. If this parameter is omitted or 
if TRACE is specified without a value, the default is 50. 

SYMS=sym List of symbols to be dumped by DEBUG. Up to 20 symbols 

can be specified; symbols are separated by a colon. This 
parameter applies to all blocks dumped. The default is all 
symbols . 
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W<yrSYMS=nsym 

List of symbols to be skipped. Up to 20 symbols can be 
specified; symbols are separated by a colon. This parameter 
applies to all blocks dumped. The default is that no 
symbols are to be skipped. This parameter takes precedence 
over the SYMS parameter. 

BLOCKS=blk 

List of common blocks to be included in the symbolic dump. 
A maximum of 20 blocks can be specified. All symbols 
(qualified by the SYMS and NOTSYMS parameters) in the blocks 
named here are to be dumped. If BLOCKS is specified without 
a value, all common blocks are dumped. 

mOTBLKS-nblk 

List of common blocks to be excluded from the symbolic 
dump. A maximum of 20 blocks can be specified. The default 
is to exclude no blocks. NOTBLKS specified without a value 
excludes all but the subprogram block. This parameter takes 
precedence over the BLOCKS parameter. 

MAXDm=dim 

Maximum number of each dimension of the arrays to be 
dumped. This parameter allows the user to sample the 
contents of arrays without creating huge amounts of output. 
For example: 

... ,MAXDIM=3:2:3 f ... 

causes the following elements to be dumped from an array 
dimensioned as A(10,3,6): 

A<1, 1, 1) A(2, 1, 1) A(3, 1, 1) A(l, 2, 1) A(2, 2, 1) 

A(3, 2, 1) A(l, 1, 2) A(2, 1, 2) A(3, 1, 2) A(l, 2, 2) 

A(2 r 2, 2) A(3, 2, 2) A(l, 1, 3) A(2, 1, 3) 

A(3, 1, 3) A(l, 2, 3) A(2, 2, 3) A(3 f 2, 3) 

This parameter applies to all blocks dumped. The default 
is MAXDIM=20: 5: 2:1:1:1:1. The arrays are dumped in storage 
order. 

TASKS Trace back through all existing tasks; the default is to 
trace back only through tasks that were running when the 
dump dataset was written. Not available with SYMDEBUG. 



PAGES=np Page limit for the symbolic debug routine. 
70 pages. 



The default is 



COMMENT= * string ' 

Identifier to be printed on the DEBUG output title line. 
Up to 8 ASCII characters can be specified. 
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DSDUMP - DUMP DATASET 

The DSDUMP utility dumps specified portions of a dataset to another 
dataset. A disk dataset can be dumped in either blocked or unblocked 
format. A tape dataset can be dumped only in blocked format. 

In the blocked format, a group of words within a record, a group of 
records within a file, and a group of files within a dataset can be 
selected. Initial word number, initial record number, and initial file 
number are relative to the current dataset position. Specifying an 
initial number greater than 1 (or 0, if the control statement includes 
the Z parameter) causes words, records, or files to be skipped starting 
from the current position. 

Since the initial word, record, or file number is relative to the current 
position of the dataset, the dataset must be positioned properly before 
calling DSDUMP. A rewind of the dataset before calling DSDUMP makes the 
initial word, record, and file numbers relative to the beginning of the 
dataset. When DSDUMP is completed, the input dataset is positioned after 
the last record dumped. 

The unblocked format is used for dumping a disk dataset without regard to 
whether it is blocked. Dumping a blocked dataset in unblocked format (by 
sectors) is possible. A group of sectors within the dataset or a group 
of words within each sector can be selected. The initial word and 
initial sector numbers are relative to the beginning of the dataset. 
Specifying an initial sector greater than 1 causes sectors to be skipped 
from the beginning of the dataset; specifying an initial word greater 
than 1 (or 0, if the control statement includes the Z parameter) causes 
words to be skipped from the beginning of each sector. Following a dump 
in unblocked format, the dataset is closed. 

Two groups of DSDUMP parameters require the specification of numbers: 
the values of the initial word, record, file, and sector (I values) and 
their counts (N values). These values may be specified in three ways: 

• Simple number (for example, 1234). This is interpreted as a 
decimal number. 

• Explicit decimal number (for example, D'1234 1 or D1234) . 

• Explicit octal number (for example, 0'1234' or 01234). 

The following lines reference the same first word: 

DSDUMP,..., IW=4096. 
DSDUMP, . . . ,IW=D'4096* . 
DSDUMP,..., IW=0' 10000'. 
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Format : 



DSDUMP , l=idn , Q-odn , DF=df, IW=« , NW=« , IR=n , NR=rz , !F=n , 



NF=tt,IS=tt,NS=rc,Z,DB=<2&,DSZ=S2. 



Parameters are in keyword form; the only required parameter is I. 

I-idn (or DH=idn) 

Name of dataset to be dumped. This is a required parameter, 

0=odn (or L=odn) 

Name of dataset to receive the dump. The default is $OUT. 

DF=df Dump format. The default is B. 

B Blocked 
U Unblocked 

IVI=n Decimal or octal number (n) of the initial word for each 

record/sector on idn. The default is if Z is specified; 
1 if Z is not included. 

UW=n Decimal or octal number (n) of the words per 

record/sector to dump. Specifying NW without a value dumps 
all words to the end of a record/sector. The default is 1. 

IR=n Decimal or octal number (n) of the initial record for 

each file on idn. Applicable only if DF=B. The default 
is if Z is specified; 1 if Z is not included. 

NR=n Decimal or octal number (n) of the records per file to 

dump. Specifying NR without a value dumps all records to 
the end of the file. Applicable only if DF=B. The default 
is 1. 

IF=n Decimal or octal number (n) of the initial file for 

dataset on idn. Applicable only if DF=B. The default is 
if Z is specified; 1 if Z is not included. 

NF=n Decimal or octal number (n) of the files on idn to 

dump. Specifying NF without a value dumps all files to the 
end of the dataset. Applicable only if DF=B. The default 
is 1. 
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IS=rz Decimal or octal number (n) of the initial sector on 

idn. Applicable only if DF=U. The default is if Z is 
specified; 1 if Z is not included. 

NS=« Decimal or octal number (n) of the sectors to dump. 

Specifying NS without a value dumps all sectors to the end 
of the dataset. Applicable only if DF=U. The default is 1. 

Z Zero-based initial-value parameters (IW, IR, IF, and IS) . 

If Z is specified, the default value for each "I" parameter 
is 0, and output referring to word, record, file, and sector 
numbers begins at 0. The following lines reference the same 
first word: 

DSDUMP,..., IW=4096. 
DSDUMP, . . . , Z , IW=4095 . 

If Z is not specified, all "I" parameters are 1 based. 

The Z parameter does not affect the "number of" ("N") 
parameters . 

DB=db Numeric base in which to display the data words. 

OCTAL or Octal (base 8) 
HEX or X Hexadecimal (base 16) 

The default is OCTAL. 

DSZ=sz Size of the data items to dump. 

WORD or W CRAY-1 words (64 bits) 

PARCEL or P CRAY-1 parcels (16 bits) 

The default is WORD. 



For blocked format, each record from idn dumped to odn is preceded by 
a header specifying the, file and record number in both octal and decimal. 
For unblocked format, each sector is preceded by a header specifying the 
sector number in both octal and decimal. 

Table 13-1 summarizes the DSDUMP output records according to the 
specification of DB and DSZ parameters. 
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Table 


13-1. DSDUMP output format 




Word 


Number 


ASCII 


DB,DSZ 


count 


interpretation 


interpretation 


OCTAL, WORD 


t 


Four 22-digit 


One 32-character 






octal numbers 


interpretation 


HEX, WORD 


t 


Four 16-digit 


One 32-character 






hexadecimal numbers 


interpretation 


OCTAL, PARCEL 


f 


Sixteen 6-digit 


None (insufficient 






octal numbers 


space) 


HEX, PARCEL 


t 


Sixteen 4-digit 


One 32-character 






hexadecimal numbers 


interpretation 



t If the Z parameter is used, the word count is 
the Z parameter is not used, the word count is 



based and octal. If 
1 based and decimal. 



A row of five asterisks indicates that one or more groups of four words 
have not been formatted because they are identical to the previous four. 
Only the first group is formatted. The number of words not formatted can 
be determined from the word counts of the formatted lines before and 
after the asterisks. The final group of four or less words is always 
formatted. 



COMPARE - COMPARE DATASETS 

The COMPARE utility compares two blocked datasets and lists all 
differences found. The output consists of a listing of the location of 
each discrepancy, the contents of the differing portions of the datasets, 
and a message indicating the number of discrepancies. See the CRAY-OS 
Message Manual, publication SR-0039. 

Keyword parameters allow the user to specify the maximum number of errors 
and the amount of context to be listed. 

If portions of two datasets are being compared, the portions must be 
copied to a separate dataset before comparison; COMPARE compares complete 
datasets only. 

COMPARE rewinds both input datasets before and after the comparison. 
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Format: 



COMPARE , K=adn , B=bdn , L=ldn , DF=c?f , ME=maxe , C9=opn , 




Z. 



CS-osn , CVl^ow-^ : ow 2 r ABORT=ac , 



Parameters are in keyword form; both A and B must be specified. 

A=adn and B=bdn 

Input dataset names. If adn-bdn, an error message is 
issued and the job step is aborted. A and B are required 
parameters . 

L-ldn Dataset name for list of discrepancies. Idn must be 

different from adn and bdn. The default is $OUT. 

DF=df Input dataset format. The default is T. df is a 

1-character alphabetic code as follows: 

B Binary. The input datasets are compared logically to 
verify they are identical. If they are not identical, 
the differing words are printed in octal and as ASCII 
characters. The location printed is a word count in 
decimal. The first word of each dataset is called 
word 1. 

T Text. The input datasets are compared to see if they 
are equivalent as text. For example, a 
blank-compressed record and its expansion are 
considered equivalent. If the two datasets are not 
equivalent, the differing records are printed as 
text. The location is printed as a record count in 
decimal. The first record of each dataset is called 
record 1. 

ME=maxe Maximum number of differences printed. The default is 100. 

CP=opn Amount of context printed, opn records to either side 

of a difference are printed. The CP parameter applies only 
if DF=T; if DF=B and CP are specified, an error message is 
generated. The default is 0. 

CS-osn Amount of context scanned, osn records to either side 

of a discrepancy are scanned for a match. The CS parameter 
applies only if DF=T; if DF=B and CS are specified, an 
error message is generated. The default is 0. 
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If a match is found within the defined range, subsequent 
comparisons are made at the same interval. That is, if 
record 275 of dataset A is equivalent to record 277 of 
dataset B, the next comparison is between record 276 of 
dataset A and record 278 of dataset B. 



NOTE 

If identical records occur within osn 
records of each other, the pairing is 
ambiguous and COMPARE can match the wrong 
pair. 



CW=cw or CW=cw±:cW2 

Compare width. If CW=<?w is specified, columns 1 through 
cw are compared. If CW=*?Wi:CW2 * s specified, columns 
<?WjL through cm 2 are compared. Specifying CW without a 
value is not permitted. The default is to compare columns 1 
through 133, but this can be changed by installation option. 
The CW parameter applies only if DF=T; if DP=B and CW are 
specified, an error message is generated. 

ABORT=a<? If ao or more differences are found, the job step aborts. 
Specifying ABORT alone is equivalent to ABORT s l and causes 
an abort if any differences are found. Specifying ABORT 
does not prevent the listing of up to maxe differences. 



PRINT - WRITE VALUE OF EXPRESSION TO LOGFILE 

The PRINT control statement writes the value of an expression on the 
logfile. The value of the expression is written in three different 
formats: as a decimal integer, as a 22-digit octal value, and as an ASCII 
string. PRINT is a system verb. 



Format : 



PRINT (expression ) 
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Parameter : 

expression 

Any JCL expression (see section 16) . This parameter is 
required. 

Logfile format: 

UT060 decimal octal ASCII 

UT060 Message code indicating origin is PRINT statement 

decimal 16-digit decimal representation of evaluated expression 

octal 22-digit octal representation of evaluated expression 

ASCII 8-character ASCII representation of evaluated expression 



FLODUMP - FLOW TRACE RECOVERY DUMP 

The FLODUMP utility recovers and dumps flow trace tables when a program 
aborts with flow tracing active. The flow trace tables are dumped in the 
FORTRAN flow trace format. 

FLODUMP is invoked by specifying the F option on the CFT control 
statement and including the FLODUMP control statement in the COS control 
statement file. (Refer to the FORTRAN (CFT) Reference Manual, CRI 
publication SR-0009, for more information on the F option.) 



Format : 



FLODUMP. 



Parameters : None 

The following example illustrates the use of the FLODUMP control 
statement . 



SR-0011 13-15 M 



JOB, ... 

CFT,ON=F. 

LDR. 

EXIT. 

DUMP JOB. 

FLODUMP. 



A flow trace summary is illustrated in figure 13-1; a flow trace recovery 
dump is shown in figure 13-2. 

The examples in figures 13-1 and 13-2 show that the total time reported 
for the main program, ONF, is larger for the flow trace recovery dump 
(FLODUMP) than for the flow trace summary. The difference is that the 
time reported with FLODUMP includes the main program's execution time, 
the time required to abort the program, and the time required to recover 
the flow trace tables. 



FLOW TRACE 


SUMMARY 












ROUTINE 


TIME 


% 


CALLED 


AVERAGE T 




1 


ONF 


0.000053 


5.42 


1 


0.000053 


CALLS SUB1 


2 


SUB1 


0.000323 


32.80 


9 


0.000036 


CALLED BY ONF 
CALLS SUB2 


3 


SUB2 


0.000322 


32.75 


9 


0.000036 


CALLED BY SUB1 
CALLS SUB3 


4 


SUB3 


0.000286 


29.04 


9 


0.000032 


CALLED BY SUB2 


*** 


TOTAL 


0.000985 










*** 


OVERHEAD 


0.000712 











SUBROUTINE LINKAGE 


OVERHEAD SUMMARY 




28 CALLS 






MINIMUM MAXIMUM 


AVERAGE 


CYCLES 


SECONDS 


% 


T REGISTERS 




1 2 




2.0 


838 


1.05E-05 


1.0640 


B REGISTERS 




2 3 




3.0 


894 


1.12E-05 


1.1351 


ARGUMENTS 









0.0 





0.00E+00 


0.0000 


TOTAL 










1732 


2.17E-05 


2.1991 


MAXIMUM SUBROUTINE 


DEPTH = 4 













Figure 13-1. Example of a flow trace summary 
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FLOW TRACE RECOVERY DUMP RECOVER WITH ONFDMP ACTIVE 

FLOW TRACE SUMMARY 

ROUTINE TIME % CALLED AVERAGE T 



1 ONFDMP 


0.000328 


26.04 


1 


2 SUB1 


0.000323 


25.64 


9 


3 SUB2 


0.000322 


25.61 


9 


4 SUB3 


0.000286 


22.70 


9 


*** TOTAL 


0.001259 






*** OVERHEAD 


0.000712 







0.000328 

CALLS SUB1 
0.000036 CALLED BY ONFDMP 

CALLS SUB2 
0.000036 CALLED BY SUB1 

CALLS SUB3 
0.000032 CALLED BY SUB2 



SUBROUTINE LINKAGE 


OVERHEAD SUMMARY 




28 CALLS 






MINIMUM MAXIMUM 


AVERAGE 


CYCLES 


SECONDS 




T REGISTERS 




1 2 




2.0 


838 


1.05E-05 


0.83 


B REGISTERS 




2 3 




3.0 


894 


1.12E-05 


0.88 


ARGUMENTS 









0.0 





0.00E+00 


0.00 


TOTAL 










1732 


2.17E-05 


1.71 


MAXIMUM SUBROUTINE 


DEPTH = 4 













Figure 13-2. Example of a flow trace recovery dump 



FTREF - GENERATE FORTRAN REFERENCE LISTING 

FTREF is a tool that generates a listing containing several forms of 
information about a FORTRAN application. FTREF reports on the common 
block variables used in the subroutines within an application. FTREF 
provides tabular information that consists of entry names, calling 
routines, and called routines for each subroutine and displays this 
information as a static calling tree. If the user program is 
multitasked, FTREF reports whether a common variable or a subroutine is 
locked when it is referenced or redefined. 

FTREF requires the output produced when ON=XS is specified in a previous 
CFT statement. The dataset to be processed by FTREF may contain any 
number of modules used by the application. The more application modules 
included in the dataset, the more complete will be the output of FTREF. 
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FTREF CONTROL STATEMENT 

The FTREF control statement follows a CFT control statement that 
specified ON=XS. 



Format: 

/ 



FTREF , I^idn , LHdn , TREE=op , CB^op , ROOT^rtftft , EtHD^end , 

7 





LEVELS , DIR=dir , NORDER , 



Parameters : 



I=idn Input dataset containing the cross reference table listing 

and the source program from CFT with ON=XS. This parameter 
is required. 

L=ldn Dataset containing the output listing. The default is $OUT. 

TREE=op Produces information about the routines called and the 

static calling tree for the program. The value , **LOOP** 1 
indicates there is an apparent recursive call in the 
program. The options are: 

PART Reports entry names, external calls, other routines 
that call the routine, and common block names from 
the input dataset. 

FULL Reports the information that the PART option 
provides plus the static calling tree. 

The default is PART. 

CB=op Global common block cross references. The options are: 

PART Identifies the routine names using a common block. 

FULL Details the use of the variables of a common block 
in a routine. 

The default is PART. 
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ROOT=root Produces a tree with the routine root as a root. ROOT 
can be used to get a subtree for the program. As a 
default, the routine not called by another routine is 
chosen. If there are more than one uncalled routines, the 
first routine by alphabetic order is chosen as the root. 

EHD=end Produces a tree with the routine end as the end of the 

tree. The value '**STOP**' is printed whenever the routine 
is found, and that branch of the tree is terminated. By 
default, FTREF generates a tree containing all subroutines 
in the program. 

LEVEL=rc Produces a tree of n levels. The default is the entire 
program. If both LEVEL and END are specified, FTREF 
terminates a branch of the tree at whichever state is 
encountered first. 

DIR=dir Selects modules to process or common blocks for FTREF to 
check to determine whether a variable is in a locked area. 
The dataset dir contains a set of directives that control 
the processing or check. If DIR is specified without a 
value, the directives are taken from the next file of $IN. 
The directives are explained in detail in the next 
subsection. The default is no directives to be read. 

NORDER Lists the subroutines in input order instead of alphabetic 
order. The default is alphabetic order. 



DIRECTIVES 

A FTREF directive consists of a keyword and zero or more parameters. A 
blank, comma, or open parenthesis separates the keyword and the 
parameters. A period, closed parenthesis, or two consecutive blanks are 
the terminator. A caret at the end of the directive line indicates that 
the next line is a continuation of the current directive. Do not precede 
the caret by a blank; it must immediately follow the last non-blank 
character of the line. The caret also separates thei parameters from the 
next line. 

One line may contain only one directive. FTREF processes 80 characters 
per line and ignores the rest of the characters. 



SUBSET directive 

The SUBSET directive specifies the modules to be processed by FTREF. 
This directive prevents FTREF from processing modules not on the 
parameter list. SUBSET may appear any time and as often as necessary. 
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If no SUBSET directive appears, or only one SUBSET directive is specified 
and it has no parameters, FTREF processes all modules in the input file. 



Format : 



SUBSET, md 2 f md 2 r • • »md n * 



where md is the name of the module to be processed by FTREF. 



CHKBLK directive 

The CHKBLK directive specifies the common blocks whose variables FTREF is 
to check to determine whether a variable is in a locked area. The 
directive may appear any time and as often as necessary. If no CHKBLK 
directive appears, FTREF does not check for variables in a locked area. 
If there is only one CHKBLK directive and it is without a parameter, 
FTREF processes all the block variables in the input. 

A locked area begins with a LOCKON call and ends with a LOCKOFF call with 
the same lock variable. If a common block variable is referenced or 
redefined in such an area, it is considered to be locked; otherwise, it 
is unlocked. Check to ensure that this is a safe condition. A locked 
area must be completely within a compilation module to be detected by 
FTREF. See the Multitasking User Guide, CRI publication SN-0222, for 
more information on using the locking feature. 



Format : 



CKKBLK,blk2,blk2, • . .blk n , 



where bVk is the name of the common block whose variables FTREF is to 
check to determine whether a variable is in a locked area. Specify // as 
the name of a blank common block. 



NOTE 

FTREF searches for the presence of the LOCKON and 
LOCKOFF calls. It does not attempt a flow analysis, 
and it does not consider the effects of IF statements, 
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CHKMOD directive 

The CHKMOD directive specifies the external calls whose routines FTREF is 
to check to determine whether an external call is in a locked area. The 
directive may appear any time and as often as necessary. If no CHKMOD 
directive appears, or if there is only one CHKMOD directive and it is 
without a parameter, FTREF does not check for external calls in a locked 
area. See the CHKBLK directive above for a definition of a locked area. 



Format : 



CHKMOD ,mod i ,mod2 1 • • •mod n , 



where mod is the name of the module whose routines FTREF is to check to 
determine whether then module is called from a locked area or not. 



Example : 

The following example uses the FTREF control statement. 

JOB,.. . 

ACCOUNT,... 

CFT,ON=XS,L=XYZ. 

FTREF, I=XYZ ,CB=FULL,TREE=FULL,DIR. 



/EOF 

CFT source 
/EOF 
CHKBLK 
/EOF 



If the example uses the following tree structure, 

MAIN 



SUB1 SUB2 SUB3 



SUBSUB1 SUBSUB2 SUBSUB1 

I I 

SUB22 SUB22 

I I 

SUBSUB2 SUBSUB2 
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. the portion of the output produced by TREE=FULL is: 



******************************************* 

* * 

* STATIC CALLING TREE FOR MAIN * 

* * 

******************************************* 



MAIN 



1 > 
1 > 



SUB1 

2 > 
SUB2 
SUB3 



SUBSUB1 SUB22 SUBSUB2 

SUBSUB2 

SUBSUB1 SUB22 SUBSUB2 



****** END OF THE CALLING TREE ****** 



SYSREF - GENERATE GLOBAL CROSS-REFERENCE LISTING 

The SYSREF utility generates a global cross-reference listing for a group 
of CAL or APML programs. The number of CAL or APML programs that can be 
included in such a group is limited by the amount of Cray Computer System 
memory allocated to a user. 

SYSREF reads special binary symbol tables written by CAL or APML and 
produces a single cross-reference listing for the program modules 
represented in the tables. When the X parameter appears on a CAL or APML 
statement, a record is written for each program unit assembled. The 
records are written to a dataset specified by the X parameter ($XRF by 
default or if X appears alone) . Each record has a header containing the 
name of the program unit. The rest of the record consists of 
cross-reference information for every global symbol used in that program. 



Format : 



SYSREF , X=xdn , l^ldn . 



Parameters: 
X=xdn 

L=ldn 



Name of dataset whose first file (normally the only file) 
contains one or more symbol records written by CAL and/or 
APML. The default is $XRF. 

Name of output dataset. The default is $OUT. 



SR-0011 



13-22 



M 



USE OF SYSREF 

SYSREF is usually used to process symbol records written by CAL and/or 
APML earlier in the same job. To do so, add X parameters to each CAL or 
APML control statement and follow them with a SYSREF control statement: 

CAL,X. 

APML,X. 

CAL,X. 

SYSREF, L=XROUT. 

$XRF is used as default in all cases. 

To process symbol records written in an earlier job, the following 
sequence is used: 

The first job: 

CAL,X. 

APML,X. 

SAVE , DN=$XRF , ID=XX . 

The second job: 

ACCESS , DN=$XRF , ID=XX . 
SYSREF, L=XROUT. 

To add more symbol records before invoking SYSREF, use: 

ACCESS , DN=$XRF , ID=XX , UQ . 

SKIPR,DN=$XRF,NR. 

CAL,X. 

SYSREF. 

The format above has the same effect as if the CAL step had been done 
before the SAVE step. 



GLOBAL CROSS-REFERENCE LISTING FORMAT 

The global cross-reference listing contains only global symbols. A 
symbol is global if it is any one of the following: 

• Named in an ENTRY or EXTERNAL statement 

• Defined before an IDENT statement and after any preceding END 
statement 
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• Defined within a system text such as $SYSTXT 

• Defined within a section of source code bracketed by TEXT and 
ENDTEXT pseudo instructions 

The order of the symbols in the global cross-reference listing is 
lexicographic, based first on the symbol name and then (within each 
symbol name) on the module name. An exception to the order is made for 
symbol names beginning with N@, S@, or W@. These symbol names are sorted 
as if @ is the most significant (leftmost) character and the N, S, or W 
is the least significant character. The listing displays the symbol name 
correctly. The effect is a grouping of all the N@, S@, and W@ symbols 
that refer to the same field in a table. 

The global cross-reference listing consists of 13 columns: 

Column Heading Contents 

1 Value The symbol's value 

2 Symbol The symbol's name 

3 Origin The IDENT of the system text in which the symbol is 

defined; or the label of the TEXT block in which 
the symbol is defined; or *GLOBAL*, if the symbol 
is defined outside any program unit; or blank. 

4 Module The IDENT of the module within or before which the 

symbol is defined or referenced 
5-13 References A list of the lines on which the symbol is defined 

or referenced 

The symbol's name, value, and references appear in the same format as in 
a CAL or APML listing. The page number in each reference is a local page 
number which starts at 1 for each module. In a CAL or APML listing, this 
is the page number that appears in parentheses to the right of the second 
title line on each page. 



ITEMIZE - INSPECT LIBRARY DATASETS 

The ITEMIZE utility prints a formatted report of the contents of a 
dataset generated by CAL, CFT, BUILD, LDR, UPDATE, and other compatible 
processors. For additional information about the contents of an UPDATE 
PL, use AUDPL. See CRI publication SR-0013, UPDATE Reference Manual. 

ITEMIZE is executed using the following control statement. 



SR-0011 13-24 M 



Format: 



ITEMIZE, DN=«fa,L=<xfo,NREW,NF=rc,T,BL,E,B,X. 



Parameters: 
DN=dn 

L=odn 

NREW 

NF=rc 



BL 



B 



Local dataset name of the dataset to be listed. The default 
is $OBL. 

Local dataset name where listing is written. If L is 
omitted or is specified alone, $OUT is used. 

No rewind. Specifies the dataset is not rewound. If NREW 
is omitted, the dataset to be listed is rewound before and 
after ITEMIZE is executed. 

Number of files within a dataset to be listed. If NF is 
used alone, the contents of all files within the dataset are 
listed. If NF=rc, the contents of n files within the 
dataset are listed. The default is NF=1. 

Truncation. Specifying this parameter truncates lines on 
the listing dataset to 80 characters. Optional parameter; 
however, specifying this parameter precludes specifying the 
E, B, and X parameters. 

Bur stable listing. When this parameter is specified, each 
dataset heading starts at the top of a page. The default is 
a compact listing in which a page eject occurs only when the 
current page is nearly full. 

Entry points. Specifying E causes all entry points to be 
included in the listing. Use for binary library datasets 
only. 

Blocks. Specifying B causes all entry points, code, and 
common block information to be included in the listing. Use 
for binary library datasets only. (B overrides E.) 

Externals. Specifying X causes all entry points, code, 
common block, and external information to be included in the 
listing. (X overrides B.) 
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Restrictions: 

• An UPDATE PL is recognized only if it is the only item in a 
data set. 

• ITEMIZE operates on standard COS blocked datasets only. 

• ITEMIZE does not operate on a tape dataset. 

A header containing the jobname, ITEMIZE version number, date, time, and 
page number appears at the top of every page. The line shown below 
appears following the header on page 1 (or only page) . The line gives 
the local dataset name of the dataset being processed. 

ITEMIZE OF dn 

ITEMIZE normally produces file-level output. However, for binary library 
datasets, it produces a more detailed record-level output. The following 
subsections describe both levels of output. 



FILE-LEVEL OUTPUT 

ITEMIZE prints one line for each file examined (up to the maximum 
specified by the NF parameter or the default of 1) . A second header line 
appears on each page and contains the column headings shown in figure 
13-3. 



TITEMA 


ITEMIZE 


1.08 


05/10/82 




08:58:15 


PAGE 1 




ITEMIZE 


OF 


TESTPL 










FILE 


RECORDS 




TYPE 


LENGTH 


CHECK 


PART 


DATE 


1 


6 




PL 


18 


0650 


0650 


05/10/82 


2 


5 




PL 


15 


0512 


0512 


05/10/82 


3 


4 




PL 


12 


0313 


0313 


05/10/82 


4 


1 




PL 


6 


3075 


3075 


05/10/82 


5 


1 




PL 


6 


5756 


5756 


05/10/82 





* EOD * 






57 


2334 


2334 





Figure 13-3. Sample listing of ITEMIZE for a PL 
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Figure 13-3 is an example of ITEMIZE operating on a program library. The 
control statement used to generate the listing was ITEMIZE, BL,NF. 

FILE Sequence number of the file within the dataset 

RECORDS Number of records within the file 

TYPE Type of information contained within the file. If the file 
is a member of a PL, the column contains PL. Other values 
which may appear in this column are ABS, REL, DAT, and 
???. ABS and REL indicate absolute and relocatable program 
modules, respectively. DAT indicates data, and ??? is used 
for otherwise unrecognized files. 

LENGTH Length of the file in words 

CHECK Checksum of the data within the file 

PART This field is the same as CHECK for file-level output. 

DATE Date of the PL from its directory or blank if other types 
of datasets 

A PL created by the UPDATE utility consists of many files. The last file 
of the dataset must be a PL directory. If NF is not specified on the 
control statement, ITEMIZE prints information only for the first files, 
although it has examined the last file. The dataset must contain only a 
PL. 



OUTPUT FOR BINARY LIBRARY DATASETS 

A binary library is a collection of binary records recognized by the 
existence of a Program Description Table (PDT) Table. For binary library 
datasets, ITEMIZE operates record-by-record rather than file-by-file. 
The second header line for binary library datasets contains the column 
headings shown in the following figure. 

Figure 13-4 is an example of ITEMIZE operating on a binary library 
dataset. The control statement used to generate the listing was 
ITEMIZE,BL,NF,X. If the control statement had been ITEMIZE, BL,NF. , 
lines with no entry in the REC column would not have appeared. 

REC Sequence number of the record within the file 

NAME Name of the program from the PDT 

TYPE ABS or REL. ABS and REL indicate absolute and relocatable 
program modules, respectively. 
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ITEMIZE 1.08 
ITEMIZE OF TESTLIB 



05/10/82 



08:58:15 



REC 

1 



NAME 
DUMMY1 

* ENT 

* BLK 

* BLK 

* EXT 
DUMMY2 

* ENT 

* BLK 

* BLK 

* EXT 
DUMMY3 

* ENT 

* BLK 

* BLK 
* EOF * 



TYPE 
REL 



DUMMY1 
#TB 



DUMMY2 
#TB 



DUMMY3 
#TB 



PART 
0344 



11 
4 



FILE 
LENGTH CHECK 
41 6200 

COMMENT : 
DUMMY1 

MODULE LENGTH : 
MODULE LENGTH : 
DUMMY2 DUMMY3 

38 2177 0244 
COMMENT: 
DUMMY 2 

MODULE LENGTH : 
MODULE LENGTH : 
DUMMY 3 

34 6403 

COMMENT! 
DUMMY 3 

MODULE LENGTH : 

MODULE LENGTH : 

113 0742 



10 
4 



0637 



9 
4 

0065 



PAGE 



DATE 
05/10/82 08:58:14 



CFT 1.09 03/25/82 COS 1.11 05/09/82 



05/10/82 08:58:14 CFT 1.09 03/25/82 COS 1.11 05/09/82 



05/10/82 08:58:14 CFT 1.09 03/25/82 COS 1.11 05/09/82 



08:58:15 



FILE 
LENGTH CHECK 
19 3512 
DIRECTORY LENGTH : 



PART 
3512 



TITEMA ITEMIZE 1.08 05/10/82 
ITEMIZE OF TESTLIB 
REC NAME TYPE 

1 * DIR * REL 
DIRECTORY ID : D01 

MODULE NAME : DUMMY1 . NO. OF BLOCKS : 1, NO. 

* ENT * DUMMY 1 

* BLK* #TB 

* EXT * DUMMY2 DUMMY3 
MODULE NAME : DUMMY 2 . NO. OF BLOCKS : 

* ENT * DUMMY2 

* BLK* #TB 

* EXT * DUMMY3 
MODULE NAME : DUMMY3 . NO. OF BLOCKS : 

* ENT * DUMMY 3 

* BLK* #TB 

2 * EOF * 19 3512 
* EOD * 132 1130 



19 WORDS. 
OF ENTRIES 



1, NO. OF ENTRIES 



1, NO. OF ENTRIES 



3512 
0246 



1, NO. OF EXTERNALS 



1, NO. OF EXTERNALS : 1 



1, NO. OF EXTERNALS 



Figure 13-4. 



Sample listing of ITEMIZE for a binary library dataset 
with X and NF parameters 



LENGTH Length of the record in words 
CHECK Checksums 
PART Checksums 



DATE 



Date of compilation from the PDT 



One line containing the data listed above is generated for each record. 
If any of the E, B, or X options are specified on the control statement, 
several additional lines can be printed. The information in these lines 
is labeled separately as described in the following paragraphs. 
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When E, B, or X is specified, the comment field of the PDT is printed on 
a separate line. In addition, the entry point names are printed with 
five names per line. 

When B or X is specified, a separate line is printed for each block 
containing its name and length. 

When X is specified, the externals referenced by the program are printed 
with five external names per line. 

A binary library dataset contains a second directory file containing one 
record. If E, B, or X is specified on the control statement, a line is 
printed specif ing the directory ID and length. In addition, entries, 
blocks, and externals are printed as described above for program records. 
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EXECUTABLE PROGRAM 14 

CREATION 



The COS Relocatable Loader is a utility program that executes within the 
user field and provides the loading and linking in memory of relocatable 
modules from datasets on mass storage. 

The relocatable loader is called through the LDR control statement when a 
user requires loading of a program in relocatable format. Absolute load 
modules can also be loaded. The design of the COS loader tables and 
relocatable loader allows program modules to be loaded, relocated, and 
linked to externals in a single pass over the dataset being loaded. This 
minimizes the time spent in loading activities on the Cray Computer 
System. The loader allows the immediate execution of the object module 
or the creation of an absolute binary image of the object module on a 
specified dataset. Loader features are governed by parameters of the LDR 
control statement. 

The relocatable loader can also generate a partially relocated module. 
This module, referred to as a relocatable overlay, is described later in 
this section. 



LDR CONTROL STATEMENT 

The loader is called into execution by the LDR control statement. 
Parameters of the control statement determine the functions to be 
performed by the loader. 
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Format: 



LDR , DN=t?rz , LIB=ldn , NOLIB-ldn , LLD , kB=adn , MAP=*?p , S ID [ « ' string ■ ] , T=tra , 






NX , DEB=Z , C=com , OVL=dir , CNS , NA , USA f L=ldn , SET=val , E=n , I=sdir , 

7 



NOECHO, SECURE f GRANT=sC 1 :sc 2 : • • • ' 8 ^ n r BC=bo, VAD^pad ,HORED , 



STK[=initial 8ize[:increment]] ,Mti[=initial size [: increment] ] , 






/AFTER ) 
MME'PS=epsilon ,MMLOC= JbeFORE I 



Parameters are in keyword form. 

DN=dn Dataset containing modules to be loaded. The default is 

$BLD. Loading continues until an end-of-file is reached. 
Modules are loaded according to block name as determined by 
a CAL IDENT statement or a CFT PROGRAM, SUBROUTINE, BLOCK 
DATA, or FUNCTION statement. Duplicate blocks are skipped 
and an informative message is issued. 

Multiple files from the same dataset can be loaded by 
specifying the dataset name multiple times separated by 
colons. A maximum of eight files can be indicated. 

Datasets specified by the DN parameter are closed at the 
end of the load process. Closing a dataset has the effect 
of rewinding the dataset and releasing I/O tables and 
buffers. 

Modules to be loaded can be relocatable or absolute. 
However, the two types of modules cannot be mixed. 
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For example, 

DN=L0AD1 : L0AD2 : $BLD 

causes the loading of all modules in the first file of 
datasets L0AD1, then L0AD2, and then $BLD. 

Normally the dataset is rewound before loading; however, 
consecutive occurrences of a dataset name inhibit 
subsequent rewind operations. Therefore, the statement 

DN=LOAD3:LOAD3 

causes the loading of all modules in the first two files of 
dataset L0AD3. 

The DN parameter takes on a special quality when OVL is 
specified: only one dn can be specified. The dataset 
named is the initial LOAD file used by the overlay loader. 
(See the description of overlay loading later in this 
section for more information.) 

LIB=ldn The LIB parameter names the dataset from which unsatisfied 
externals are loaded. A maximum of eight datasets can be 
named, with the dataset names separated by colons. 

Any default libraries are automatically included in the 
library list unless the NOLIB parameter is specified. The 
loader accesses the default libraries from the COS System 
Directory (SDR) if they are not local to the job; no ACCESS 
statement is required. 

Datasets specified by the LIB parameter are closed at the 
end of the load process. Closing a dataset has the effect 
of rewinding the dataset and releasing I/O tables and 
buffers. 



NOTE 

These datasets should be generated using the 
BUILD utility to prevent unnecessary overhead in 
the loader. 

The libraries cannot be tape datasets. 
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UOLIB=ldn The NOLIB parameter value names the specific default 

library to be excluded from the load. Selecting NOLIB with 
no value specifies the exclusion of all default system 
libraries. If NOLIB is not specified, any default 
libraries that a site has are automatically included in the 
library list, along with any libraries specified on the LIB 
parameter. 

LLD Specifying the LLD parameter causes any libraries included 
in the load to be retained as local datasets at load 
completion. These local datasets remain open. Datasets 
automatically accessed are not released at load 
completion. If the LLD parameter is not specified, the 
loader closes all libraries and releases 
automatically-accessed datasets at load completion. 

&B=adn Absolute binary object module generation. Use of this 
parameter causes an absolute binary object module to be 
written to the named dataset after the load process is 
completed. Selecting AB does not imply NX (no execution) . 
Unless NX is also selected, the loaded program begins 
execution after the binary is generated. Specifying AB 
without adn causes the module to be written on a dataset 
named $ABD, the default dataset. Some other dataset can be 
specified by &B=adn. The dataset is not rewound before 
or after the file is written. 

If the AB parameter is omitted, no binary generation occurs. 

If OVL is specified on the loader statement, the OVLDN 
directive replaces AB; any value specified for AB is 
ignored in overlay mode. Overlay loading is fully 
described later in this section. 

MAP=cp Map control. The MAP parameter causes the loader to 
produce a map of the loaded program on the specified 
dataset. MAP can take any of the following values: 

ON Produces a block list and an entry list including 
all cross references to each entry 

FULL Same as MAP=ON 

OFF No map is produced. MAP=OFF is the default. 

PART Produces a block list only. Equivalent to MAP with 
no value specified. 
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SID [=' string*] 

Debug routine loading. The SID parameter indicates the 
system debugging routines (SID) are to be loaded with the 
code. These routines comprise an additional binary dataset 
loaded after all DN specified datasets and before any 
libraries. 

The string', if provided, is passed to SID for 
evaluation as a control statement. The verb and initial 
separator are not required. For example, 

SID='I=IN,ECH=ELIST. ' is a proper string specification (the 
period is a required terminator) . For a complete 
description of SID parameters, see the Symbolic Interactive 
Debugger (SID) User's Guide, CRI publication SG-0056. If 
only SID is specified, all keyed default SID control 
statement parameter values are used. 

T=£z»a Transfer name. The T parameter allows specification of an 
entry name where the loader transfers control at completion 
of the load. The T parameter also specifies the entry 
included in absolute binary object modules. 

The entry name is a maximum of 8 characters. If no T 
parameter is specified, the loader begins object program 
execution at either the entry specified by the first 
encountered START pseudo from a CAL routine or at the entry 
of the first main program in CFT compiled routines. If no 
START entries are encountered, a warning message is issued 
and the first entry of the first relocatable or absolute 
module is used. 



NOTE 

When the SID parameter is used, the load 
transfer is to the system debugger, and the T 
parameter is ignored. If T is coded, 
however, a warning message is issued to the 
user logfile. 



NX No execution. Inclusion of this parameter inhibits 
execution of the loaded program. 

DEB=l Job Communication Block (JCB) length. The default length 
is 200 8 . Specifying DEB without a value changes the JCB 
length to 3000 8 . 
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C=eom Compressed load. The C parameter allows control of the 

starting locations of modules and common blocks. An 
align bit is set for each relocatable module and common 
block that contains an ALIGN pseudo-op. Refer to the 
CAL Assembler Version 1 Reference Manual, CRI 
publication SR-0000, or to the FORTRAN (CPT) Reference 
Manual, CRI publication SR-0009. 

C can take on any of the following values: 

ON Forces the loading of each module and common 
block to begin at the next available location 
after the previous module or common block, 
ignoring the align bit. Equivalent to C with no 
value specified. 

PART Forces the loading of each module and common 

block with the align bit set to an instruction 
buffer boundary. If the align bit is not 
set, then that module or common block is loaded 
at the next available location after the 
previous module or common block. C=PART is the 
default. 

OFF Forces the loading of every module to an 

instruction buffer boundary. Common blocks 
are forced to instruction buffer boundaries only 
if the align bit is set. 

OVL-div Overlay load. The OVL parameter indicates an overlay load 
sequence is specified on dir. Overlay loading is 
explained in detail later in this section. If the OVL 
keyword is specified without a value, the loader examines 
the next file of $IN for an overlay load sequence. The 
default is no overlay load. Selecting OVL implies NX (no 
execution) . 

CNS Crack next control statement record image. This feature 
allows the loader to pass parameters on to the loaded 
program for analysis and use during execution of the loaded 
program. The control statement cracked follows the LDR 
control statement and is not available for processing by 
the Control Statement Processor (CSP) after processing by 
the loaded program. 



Instruction buffer sizes are 2O3 words for all CRAY-1 S models and 
40s words for the CRAY X-MP. 
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NOTE 

When the SID parameter is specified, the CNS 
parameter is ignored and a warning message is 
written to the user logfile if CNS is 
present. SID prompts for the control 
statement for the code being debugged. 



NA 



USA 



L=ldn 



SET=val 



E=n 



No abort. If this parameter is omitted, a caution or 
higher level loader error causes the job to abort. 

Unsatisfied external abort. When USA is specified, the 
loader aborts at the end if it finds one or more 
unsatisfied externals. A load map listing all unsatisfied 
externals is produced, if called for. 

Listing output. This parameter allows the user to specify 
the name of the dataset to receive the map output. If L=0, 
all output is suppressed. The default is $OUT. 

Memory initialization. Variables, named and blank common 
blocks, and storage areas defined by DIMENSION statements 
are set to 0, -1, or an out-of-range floating-point value 
during loading. The default is SET=ZER0. 

SET=ZERO Memory is set to binary zeros. 

SET=ONES Memory is set to -1 (all bits set in word) . 

SET=INDEF Memory is set to a value that causes an 

out-of-range error if the word is referenced 
as a floating-point operand. The ones 
complement of each memory address is placed in 
the low-order 24 bits of the respective word 
to aid in reading register and memory dumps. 
An example, in octal, of the value loaded into 
memory word 13216 is: 0605050037740177764561. 

Lists error messages. This parameter indicates which 
level of loader-produced error messages are not to be 
listed. The user specifies one of five levels of severity, 
where n is the highest level to be suppressed. The 
default for this parameter is E=l. 
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Level Type Description 

1 COMMENT Error does not hinder program 

execution. 

2 NOTE Error probably hinders program 

execution. 

3 CAUTION Job aborts when load process 

completes unless NA is selected; 
program might not execute properly. 

4 WARNING Job aborts when load process 

completes unless NX is selected; 
program execution is not possible. 

5 FATAL Job aborts immediately. 

Example : 

E=2 suppresses COMMENT and NOTE messages and allows 
CAUTION, WARNING, and FATAL messages to appear. FATAL 
messages are never suppressed. 

1-sdiv Selective load. Modules from other datasets can be loaded 
according to a set of directives, sdir indicates the 
dataset containing the directives. If the I keyword is 
specified without a value, the directives are taken from 
the next file of $IN. The selective load directives are 
described later in this section. 

NOECHO Suppress writing the current control statement to the user 
logfile (that is, the conrol statment which invoked the 
actual loading into memory will not be written to the 
logfile) . 

SECURE Define each dataset created during this job step to be 
secure (that is, to be released during job advancement 
unless specifically overridden with a F$DSD operating 
system request) . 

GRANT Grant the privileges defined as parameters if this module 
is loaded from the System Directory (SDR) . (These 
privileges will be merged with the users 1 only for the 
duration of the job step.) The following parameters are 
defined if security is enabled: 
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SCISPT Allow ISP testing 

SCRDSC Head DSC page 

SCSPOL SAVE/ACCESS/DELETE/LOAD/DUMP spooled dataset 

SCLUSR Load user dataset 

SCDTIM Dump time request 

SCQSDT Dequeue/queue SDT requests 

SCUPDD Access user dataset for PDSDUMP 

SCACES Access user-saved dataset without passwords 

SCQDXT LINK/MODIFY DXT requests 

SCENTR ENTER option on ACCESS 

SCNVOK Invoke job class structure 

SCDUMP Allow F$DJA requests anytime 

SCPRIV Allow special system requests 

SCSYSPRG Allow system programmer functions such as 

F$PROF and F$CMEM 

SCURID Allow use of reserved ID in inter job 

communication 

SCERCH Allow F$DRIVER requests 

SCERQM Allow SDT queue manipulation 

SCMLOG Allow a user to send messages to another 

user's log file 

SCSYSJ Allow a job to be a system job 

BC=bc Blank common, be specifies the decimal number of words 

to be added to the size of blank common when the program is 
loaded for execution. The default is 0. 

PAD=pad Pad. pad specifies the decimal number of words of 

unused space to be made available in the job when the 
program is loaded for execution. After the program is 
loaded with its requested extra space the job is placed in 
user-managed field length reduction mode for the duration 
of the job step. The default is 0. 

NORED No field length reduction. Before the program is loaded 
the job is placed in user-managed field length reduction 
mode for the duration of the job step. 



STK[=initial size [ zincrement] ] 

Initializes for stack processing, 
management parameter. 



STK is a run- time memory 



initial size indicates the initial size of a stack in 
number of words. An installation parameter defines the 
default value. If the initial size value is less than 
128, LDR substitutes the default value. 

increment specifies the size of additional segments to a 
stack (in number of words) if a stack overflows. An 
installation parameter defines the default value. A value 
of indicates that overflow is prohibited. 
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MM [^initial size [ zinerement] ] 

Initializes for managed memory processing. The values 
assigned to MM specify the number of words available to 
the heap manager. 

initial size indicates the number of words initially 
available to the heap manager. An installation parameter 
defines the default value. The loader changes the 
specified value if the heap is not allowed to grow, and if 
there is no room for heap and stack overhead. 

increment specifies the minimum size, in words, of a 
request to the operating system for additional memory if 
the heap overflows. Zero means that the size of the heap 
is fixed. An increment other than zero cannot be specified 
if the heap is before blank common. An installation 
parameter defines the default value. If the BEFORE value 
is specified for MMLOC, then the default value is 0. 

MMEPS=epsilon 

epsilon is the smallest block that can be left on the 
list of available space in the heap. If a request for 
additional memory from the heap is made by the run-time 
routines, and the request leaves a memory fragment of less 
than epsilon words, the additional words are given to the 
request. The value must be at least 2. An installation 
parameter defines the default value. 

(after 1 
MML0C=r {before) 

Specifies the location of the heap. AFTER specifies that 
the heap is located after blank common. It is also the 
default. If the heap is located before blank common, 
BEFORE is specified. 



LOAD MAP 

Each time the loader is called, the user has the option of requesting a 
listing that describes where each module is loaded and what entry points 
and external symbols are used for loading. This listing is called a load 
map. 

The user specifies the contents of the map or the dataset to receive the 
map by setting parameters of the LDR control statement to the desired 
values. The MAP parameter of the LDR control statement allows the user 
to specify the contents of the map requested. MAP=ON or MAP=FULL 
produces a block list and an entry list. The block list gives the names. 
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beginning addresses and lengths of the program and subroutines loaded on 
this loader call; the entry list includes all cross references to each 
entry. MAP=PART supplies a partial map, that is, the block map only. 

The load map is printed when requested even if fatal errors abort the 
load. In this case, the map contains only those modules loaded up to the 
point where the fatal load error occurred. 

Figure 14-1 illustrates the load map generated by the following LDR 
statement: 

LDR, DN=$BLD:LOAD2,LIB=MYLIB,MAP=FULL,MM=16000: 4000, STK=1280:128 

The block list consists of items 1 through 16 in figure 14-1; the entry 
list includes items 17 through 21. 



TOTAL: 1321 



© 



© 

LDRMAP 



RELOCATABLE LOAD 



© 



LDR X.14 84251 09/24/84 



© 



11:54:11 



© 

PAGE 1 



LOAD TRANSFER IS TO 



(£_» ,© 



DATASET BLOCK/— ^ ADDRESS 

® © ® 

v — ' *SYSTEM V-' 


LENGTH 


DATE 


OS REV PROCSSR 


VER. 


Comment 


200 v_y 


® 


® 


® 


® 


® 


$BLD LDRMAP 200 


1321 


09/24/84 


COS X, 


.14 CFT 1.13 


09/21/84 




LOAD2 ABCDEFGH 1521 


36 


09/24/84 


COS X. 


,14 CFT 1.13 


09/21/84 




MYLIB XI 


1557 


41 


09/24/84 


COS X, 


.14 CFT 1.13 


09/21/84 




X2 


1620 


41 


09/24/84 


COS X. 


,14 CFT 1.13 


09/21/84 




®: 


© 


® 


® 




® 






MODULE NAME 


ENTRIES ENTRY VALUE 


REF. MODULE 




ABSOLUTE REFERENCES 




LDRMAP 


LDRMAP 


717a 












ABCDEFGH 


ABCDEFGH 


1525a 


LDRMAP 1425a 








XI 


XI 


1570a 


ABCDEFGH 1531a 








• 


NLERP% 


3234a 












$FDP 


$FDP 


4640 


$WUT 10603b 








$WFD 


$WFI 


5451a 


LDRMAP 1410a 


1416d 







*** MANAGED MEMORY STATISTICS *** 

INITIAL STACK SIZE: 1280(10) 2400(8) WORDS 

STACK INCREMENT SIZE: 128(10), 200(8) WORDS 

INITIAL MANAGED MEMORY SIZE: 16000(10), 37200(8) WORDS 

MANAGED MEMORY INCREMENT SIZE: 4000(10), 7640(8) WORDS 

MANAGED MEMORY EPSILON: 2 (10) , 

2(8) WORDS 

BASE ADDRESS OF MANAGED MEMORY/STACK: 15566(10), 36316(8) 

WORDS 

MANAGED MEMORY/STACK LOCATION: AFTER BLANK COMMON 

*** LOAD IMAGE STATISTICS *** m) 

ABSOLUTE BINARY LENGTH: 31438(10),^-^ 75316(8) WORDS 

PROGRAM IMAGE: FWA = 200(8), LWA = 75516(8) 



Figure 14-1. Example of a load map 
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(1) Job name from the JOB control statement 

(2) Loader level and Julian date of assembly of the loader 
(5) Date and time of loader execution 

4) Page number 

@ Load type; either relocatable, absolute, or overlay 

© Entry name to which initial transfer is given 

(7) Entry address where initial transfer is made 

@ Name of load or library dataset containing modules to be loaded 

(9) Names of blocks loaded from the named dataset. These are common 
blocks (identified by the slashes around their names, for 
example, /LABEL/) are names of program blocks. 

*SYSTEM is always the first block listed in a relocatable load. 
It consists of the first 200 (octal) words of the user field, 
which is reserved for the Job Communication Block (JCB) . For an 
absolute load, *SYSTEM is not allocated. Therefore, the CAL 
user must set the origin to 200 (octal) via an ORG pseudo 
instruction to allow space for the JCB. If this is not done, 
the job aborts. 

Blank common, indicated as //, is allocated last and appears at 
the end of the list (if it has been defined) . 

@ Octal starting address of the block 

Octal word length of the block 

Date the object module was generated 

Operating system revision date at the time the object module was 
generated 

Name and revision level of the processor that generated the 
object module 

Revision date of the processor that generated the object module 

Comment (if any) from CAL COMMENT pseudo included in the load 
module 

Q) Name of program block referenced 
8) Entry points in the program block 
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§} Word address, parcel address, or value of each entry point 

@) Module name of reference to each entry point 

Absolute parcel addresses of references to each entry point. 
Eight references are listed per line; some entry points have no 
references. 

Managed memory statistics. The numbers in parentheses indicate 
the base: decimal (10) and octal (8). 

Actual length of the binary; the minimum amount of memory 
required to load the program. FWA is the first word address of 
the load image. LWA is the last word address of the load 
image. The numbers in parentheses indicate the base: decimal 
(10) and octal (8) . 



SELECTIVE LOAD 

If the I keyword is present on the LDR control statement, one or more 
INCLUDE and/or EXCLUDE directives are examined in the specified dataset 



Formats : 



INCLUDE , SDH=sdn , PN=/w ^OD^jl :md 2 : . . . '-rrd 50 . 



EXCLUDE, SDN=sd«,PN=/n,MOD=wd 1 :wd 2 : • • • :^5Q» 



Parameters are in keyword form. 

SDU-sdn Name of dataset containing modules to be selectively 

loaded. If SDN is specified without a value, the first 
dataset specified on the DN parameter of the LDR statement 
is the default. If the SDN parameter is omitted, an error 
message results, and the directive is skipped; the load 
does not abort. The SDN and FN parameters must refer to 
the same dataset. 

FN=^f« File number of the specified dataset. A number from 
through 7. fn refers to the file by its numerical 
position in SDN or in the DN parameter of the LDR statement. 
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For example, if DN=D1:D1:D2, the first file of Dl has an 
fn of 0, and the second file of Dl has an fn value of 
1. If FN is specified without a value, the default is 0. 
If FN is omitted, the whole of sdn is searched for the 
correct module; a message is issued for a complete sdn 
search. The SDN and FN parameters must refer to the same 
dataset . 

To load a module from the first file of Dl, the directive 
can include the parameter FN=0; however, if FN is specified 
without a value, the default is to load a module from the 
first file. 

MOD=rnd Module name or entry point to a module to be included or 

excluded from the load. Up to 50 modules can be specified; 
the modules must be separated by colons. If the MOD 
parameter is omitted, an error message results, and the 
directive is skipped. 



Example: Given the LDR statement 

LDR,DN=D1:D1:D2,...,I. 

A directive to load a module from the second file of dataset Dl includes 
the following directive in the next file of $IN: 

INCLUDE , SDN=D1 , FN=1 ,MOD= ... . 

Selective load messages are never suppressed. 



PARTIALLY RELOCATED MODULES 

When a binary module is defined as a relocatable overlay, the loader can 
generate an image of the module that has been only partially relocated. 
The image of the binary module contains sufficient information for a user 
program to relocate all address references within the module program 
block according to the actual address where the user program determines 
the module should be executed. 

The relocatable overlay is useful because program modules are generated 
so that a common memory pool can execute the overlay and any of several 
overlays can execute at any address within the pool. 



SR-0011 14-14 M 



GENERATION OF RELOCATABLE OVERLAYS 

The CAL assembler defines a module as a relocatable overlay at assembly 
time with the MODULE pseudo-op. 



Format : 



Location 



ignored 



Parameters: 



Result 



MODULE 



Operand 



type 



type A keyword parameter identifying the type of module being 

defined. RELOCOVL is the only type currently available. 

When the relocatable overlay is defined by the assembler, COS sets a 
special flag in the Program Description Table (PDT) for use by the 
relocatable loader. 

The loader, recognizing that the current module being loaded is a 
relocatable overlay, performs limited relocation of the address 
references in the module. That is, all references to labeled common 
blocks and all references to entry points defined within other modules 
are adjusted according to the address where the other module resides in 
the memory image being constructed. References to blank common are 
illegal. It is also illegal for any other module to make any reference 
to any entry point defined to be within the relocatable overlay module. 
References from within the module to addresses within the module are not 
adjusted at this time. Instead, a copy of the necessary Block Relocation 
Table (BRT) entries is included in the memory image of the module. All 
BRT entries not needed for satisfying internal references are deleted. 

The absolute memory image of the program constructed by the loader 
contains the loaded programs, including all relocatable overlay modules. 

The relocatable overlays are physically located at the end of the memory 
image; all nonrelocatable overlay modules are loaded contiguously in the 
order they are encountered. Relocatable overlay modules can appear at 
any point in the load sequence and can be contained in libraries. The 
loader moves modules in memory as required to order the relocatable 
overlays at the end of the image. This placement of the overlays makes 
it possible for a user program to locate the images of each overlay and 
to copy the overlays to mass storage, if it is desired, in order to make 
the memory space used by the overlay images available for use by the 
program. 
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MEMORY LAYOUT WHEN RELOCATABLE OVERLAYS EXIST 

When the loader has detected the existence of one or more relocatable 
overlays, memory is laid out in the following manner: 

1. All nonrelocatable modules, in the order they are encountered on 
load datasets or in libraries 

2. Labeled common blocks interspersed among the nonrelocatable 
modules so that a labeled common block precedes the absolute 
image of the first block encountered which defines the block 

3. All labeled common blocks defined first within a relocatable 
overlay module and not defined within any other type of module 

4. Images of all relocatable overlays in the order they are 
encountered on load datasets or in libraries 

5. Unsatified external (USX) program which is the loader's internal 
program for processing unsatisfied external references 

6. Blank common if defined by any program module 

Note that the placement of USX and blank common can defeat the purpose of 
relocatable overlays, since the overlay images must remain reserved. 
With proper care, the program can use the space occupied by the overlay 
images for internal tables and other data with nonallocated space. 



MEMORY LAYOUT OF A RELOCATABLE OVERLAY IMAGE 

When the loader completes constructing the image of the complete program 
being loaded, the relocatable overlay portions have a different structure 
than do the nonrelocatable overlay portions. Normal modules are loaded 
as an absolute image with all loader-related tables removed. All address 
references, both internal to the module and to other modules, are 
adjusted so that the code executes correctly. If the C parameter is 
specified when the loader is called into execution, individual modules 
can begin immediately after the previous module, or they can begin at the 
next 16-word (decimal) boundary. 

Because relocatable overlay modules are expected by the loader to be 
moved to a different address for execution, the C specification has no 
meaning to a relocatable overlay module, and the first and subsequent 
such modules begin immediately after the last word of the previous module. 

Relocatable overlay module images also contain loader-relocated tables. 
These tables are required so that the user program can adjust address 
references within a relocatable overlay when it has determined the 
address where the overlay will execute. The tables are: 



SR-0011 14-16 M 



PDT Program Description Table 

TXT Text Table 

BRT Block Relocation Table 

The PDT contains information regarding the number of entry points defined 
and the number of blocks and external references. The TXT contains a 
count of the words in the actual image of the code, followed by the 
semi-absolute image of the code. The BRT contains information necessary 
for adjusting address references within the module. If the user program 
wants to write the overlays to mass storage, the information in the PDT 
can be used to construct a directory or similar table for locating 
specific overlays or entry points, and then can be discarded. TXT and 
BRT must be retained in the mass storage copy for future relocation of 
address references. 



OVERLAYS 

Very large programs might not fit in the available user memory space or 
might not use large portions of memory while other parts of the program 
are in execution. For such programs, the COS relocatable loader includes 
the ability to define and generate overlays, separating modules that 
the user creates and then calling and executing as necessary. 

Two types of overlays are available. 

• Type 1 overlays are generated by using the directives ROOT, 
POVL, and SOVL. Two levels of overlays in addition to the root 
overlay are allowed with calls to a maximum of 999 adjacent 
overlays. 

• Type 2 overlays are generated by using the directive OVLL. Ten 
levels of overlays in addition to the root overlay are allowed 
with calls to a maximum of 63 adjacent overlays. 

The overlay loader can also generate a partially relocated module, 
referred to as a relocatable overlay. Relocatable overlays have been 
fully described earlier in this section. 

The overlay structure, rules for overlay generation, and overlay calls 
for both types are described in this section. The control statements 
used to generate the overlay and the directives common to both types of 
overlays are described first. Specific rules for generation of Type 1 
and Type 2 overlays are described separately in the following subsections. 

Overlay generation consists of a load operation in which the loader 
performs relocatable loading and writes the resulting binary image to 
disk. One named absolute binary record is written per root and each 
overlay. 
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If the LDR control statement has the parameter OVL^div, the loader 
finds the overlay generation directives on the named dataset, dir. if 
no dataset is given (that is, OVL) , then the loader reads overlay 
generation directives from $IN. 



Format : 



LDR, . . . ,OVL=dir, . • . 



OVERLAY DIRECTIVES 

An overlay directive consists of a keyword and a parameter. A blank, 
comma, or open parenthesis must separate the keyword from the parameter. 
A period, closed parenthesis, or two consecutive blanks serve as the 
terminator. A caret at the end of the directive line indicates that the 
next line is a continuation of the current directive. The caret cannot 
be preceded by a blank; it must immediately follow the last character of 
the line. 



FILE directive 

The FILE directive indicates the dataset, dn, containing the routines 
to be loaded. This directive's function is similar to that of the DN 
parameter on the LDR control statement. It is generally the first 
directive on the directives dataset but appears at any time and as often 
as necessary thereafter. If no FILE directive appears, the loading 
proceeds from the dataset specified on the DN parameter of the LDR 
control statement. If that too has been omitted, loading initially 
occurs from $BLD. This directive is common to both overlay types. 



Format : 



FILE,cfa. 



OVLDN directive 

The function of this directive is similar to that of the AB parameter on 
the LDR control statement. This directive names the dataset, dn, on 
which overlays are written. The dn parameter must be present. If no 
OVLDN directive is present, the default overlay binary dataset ($OBD) is 
assigned. All overlays generated following an OVLDN directive reside as 
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separate binary records on dataset dn. OVLDN directives appear as 
often as desired. This directive is common to both overlay types. 



Format : 



OVLDN, dn. 



SBCA directive 

The SBCA directive sets the blank common starting address to the 
specified address. This directive allows the user to place blank common 
after all load modules in the current overlay structure. The address 
specified must be larger than any address used in the overlay structure. 
This directive must appear before any overlay generation directive, such 
as ROOT or OVLL. 



Format : 



SBCA, address. 



where address is the octal address assigned to blank common. 



TYPE 1 OVERLAY STRUCTURE 

Each Type 1 overlay is identified by a pair of decimal numbers, each from 
through 999. There must be one and only one root overlay; its level 
numbers are (0,0). This root remains in memory throughout program 
execution. Primary overlays all have level numbers (n,0) where n is 
in the range 1 through 999. 

Primary overlays are called at various times by the root and are loaded 
at the same address immediately following the root. A secondary overlay 
is associated with a specific primary overlay, and can be called only by 
the corresponding primary overlay. The secondary level numbers are 
(n,m) , where n is the primary level, and m is in the range 1 
through 999. All secondary overlays associated with a given primary 
(that is, the same n) are loaded at the same address immediately 
following that primary. 

Only the root, one primary overlay, and one secondary overlay can be in 
memory at one time. 
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Figure 14-2 is a diagram of a sample Type 1 overlay loading. The primary 
and secondary overlays are shown in time sequence. The sequence of 
generation does not imply that the routines are loaded into memory in the 
same sequence or that they remain in memory for a set period of time when 
they are executed. 

All external references must be directed toward an overlay nearer to the 
root. For example, overlay (1,0) can contain references to the root 
(0,0) but not to overlay (1,1). Overlay (1,1) can contain references to 
both (1,0) and (0,0). 

The loader places named common before the routine that first references 
it. All named common references must be directed toward a lower level 
routine. The lowest level routine with a named common block must contain 
data statements for that block. 

For example, in figure 14-2, 

MAIN Can reference named common A only 

SUB1 and SUB2 Can reference named common A and B only 

TEST Can reference named common A, B, and C 

The loader allocates blank common immediately after the first overlay 
where it is declared. If blank common is declared in the root overlay 
(0,0), it is allocated at the highest address of the root overlay and is 
accessible to all overlays. If blank common is first declared in primary 
overlay (1,0) and not declared in the root (0,0), then it is accessible 
only to the (l,x) overlays. Allocation and placement of blank common 
is also manipulated by the user through the SBCA directive. 

JCHLM is set to the highest address of the root overlay before loading. 
If a subsequent overlay module requires additional memory, JCHLM is reset 
to the highest address of that module. 



TYPE 1 OVERLAY GENERATION DIRECTIVES 

The overlay generation directives define the structure of the overlay, 
Included in this class are the ROOT, POVL, and SOVL directives. 



ROOT directive 

This directive defines programs, subroutines, and/or entry points 
comprising the load from dn. For programs written in CAL, list each 
entry referenced. FORTRAN programs need the program name only. All 
members for this directive reside on the same dataset, dn, as defined 
by the FILE directive. 
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Format : 



ROOT , member i , member 2 , member n , 
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Figure 14-2. Example of Type 1 overlay loading 
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POVL directive 

This directive causes relocatable loading of the named blocks to the 
primary overlay with the name plevel:000. The size of the root 
determines the base location. All members for this directive reside on 
the same dataset, dn. The first member in the list is the one that 
receives control when the overlay is loaded. For routines written in 
CAL, the first entry point of the first routine receives control. 



Format : 



POVL, plevel ,member ±, member , . . . ,member n . 



where plevel is between 1 and 999. 



SOVL directive 

This directive causes relocatable loading of the named blocks to the 
secondary overlay with the name plevel tslevel. The length of POVL 
(pleveltOOO) determines the base location. All members for this 
directive reside on the same dataset, dn. The first member in the 
list is the one that receives control when the overlay is loaded. For 
routines written in CAL, the first entry point of the first routine 
receives control. 



Format : 



SOVL, slevel , member ^rmember 2 # . • . ,member n , 



where slevel is between 1 and 999. 

Generation directive example 

In the following example, 

DSET1 contains routines THETA, TEST, GAMMA, SUB1, MAIN, SUB2. 

DSET2 contains routines NEW2, ALPHA, OVER, NEW1, DELTA, EPSILON, 

SIGMA, BETA. 
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Format of the control statement that initializes overlay generation: 

LDR, . . . ,OVL=OVLIN, .... 
Dataset OVLIN contains the following directives: 



FILE,DSET1. 
OVLDN,LEV00. 



ROOT, MAIN, SUB1 
,SUB2. 

P0VL,1,TEST. 



FILE,DSET2. 
SOVL,l,NEWl. 

0VLDN,LEV12. 

SOVL,2,NEW2. 



Loader selectively loads from dataset DSETl. 

The following overlay modules are written to the 
dataset LEVOO. 

The absolute binary of MAIN,SUB1,SUB2 is 
written as the first record on dataset LEVOO. 

The binary of TEST is named 001:000 and is 
binary record 2 on dataset LEVOO. 

Loader selectively loads from dataset DSET2. 

The binary of NEW1 is named 001:001 and is 
binary record 3 on dataset LEVOO. 

The subsequent overlay modules are written to 
the dataset LEV12. 

The binary of NEW2 is named 001:002 and is 
binary record 1 on dataset LEV12. 



POVL, 2, ALPHA, BETA. The binary of ALPHA, BETA is named 002:000 and is 

record 2 on dataset LEV12. 



eof 



End of overlay load sequence 



TYPE 1 OVERLAY GENERATION RULES 

1. Overlay members are loaded from datasets named in FILE 
directives. Members are searched for in the most recently 
mentioned dataset only. In the absence of a FILE directive, 
members are loaded from the dataset specified on the LDR control 
statement. If that is also omitted, loading will initially 
occur from $BLD. Currently, the relocatable modules of all 
members for any overlay level must reside on the same file. 

2. The overlays are generated in the order of the directives. 
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3. There must be one and only one root, 

4. Level hierarchy must be maintained. The root overlay must be 
generated first; hence the ROOT directives appear first. 
Following the root generation, a primary overlay (POVL) is 
generated. No limitation is placed on which primary overlay 
number (plevel) is generated; however, all secondary overlays 
(SOVL) associated with the plevel must follow. The secondary 

overlay slevels can be generated in any order following their 
respective primary level. 

5. An end-of-file in the directives file ends the input of overlay 
directives; hence overlay generation. 

6. Any directive other than FILE, OVLDN, SBCA, ROOT, POVL, or SOVL 
causes a fatal error. 

7. The list of members can be continued to another line by using a 
caret immediately following the last nonblank character at the 
end of the directive line. The A does not replace a separator 
and must not appear within a member name. 

8. Any number of lines can be used to name the members of an overlay. 

9. A secondary overlay can only be called by the corresponding 
primary overlay. 



TYPE 1 OVERLAY EXECUTION 

A control statement call of the dataset containing the ROOT overlay 
initiates its loading and execution. If no OVLDN directives are used 
before generating the ROOT, the dataset $OBD contains the ROOT overlay. 

The following sequence executes the root overlay after generation: 

LDR, ...,OVL=dir,... . 
$OBD. 

During overlay generation the members are loaded from the FILE dataset in 
the order they appear on the dataset, regardless of their order of 
appearance in the members list. The entry for POVL and SOVL overlays is 
defined by the first member listed on the generation directive. Control 
is transferred to this address after loading by the $OVERLAY routine 
during program execution. The ROOT entry is named using the T parameter 
on the LDR control statement. 

The user calls for the loading of overlays from within the program, and 
the method by which they are called depends on the program language in 
use (FORTRAN or CAL) . OVERLAY is a subroutine of the root overlay and is 
loaded into memory with the root. 
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FORTRAN language call 

A FORTRAN program calls for the loading of overlays as follows: 



CALL overlay (dn,levelj L ,level2r^) 



dn 

levels 
level 2 



Dataset name or unit number that contains the file 
to be skipped. Must be a character constant, 
integer variable, or an array element containing 
Hollerith data of not more than seven characters. 

Primary level number of the overlay 

Secondary level number of the overlay 



r An optional recall parameter. If the user wishes to re-execute 
an overlay without reloading it, 6LRECALL is entered. If not 
currently loaded, it will be loaded. 



CAL language call 

A sample call sequence from a CAL program is as follows; 



Location 



OVLDN 

PLEV 

SLEV 



Result 



EXT 



CALL 



CON 
CON 
CON 



Operand 



OVERLAY 



OVERLAY, (OVLDN, PLEV, SLEV) 



A'LEV12'L 

2 





where OVLDN is the address of the dataset name, PLEV is the address of 
the primary level, and SLEV is the address of the secondary level. If 
recall is desired, the address of the literal 'RECALL* is transmitted as 
the fourth argument. 
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Example : 



Location 



RECL 



Result 
10 



CALL 



CON 



Operand 
20 



Comment 
35 



OVERLAY, (OVLDN,PLEV,SLEV,RECL) 



•RECALLS 



Fdr both FORTRAN and CAL language calls, during execution of the 
ROOT (0,0) program MAIN, the statement 

CALL OVERLAY (5LLEV1 2, 2,0) or the above CAL sample call 

causes OVERLAY to search dataset LEV12 for the absolute binary named 
002:000, OVERLAY positions the dataset LEV12 to the location of the 
absolute binary named 002:000 using information supplied by the loader, 
loads the overlay, and transfers control to the first member specified on 
the POVL or SOVL directive. After execution of the overlay, control 
returns to the statement in MAIN immediately following the CALL 
statement. Following the load, dataset LEV12 is positioned immediately 
after the end of record for the overlay (2,0). If overlay (2,0) is not 
on dataset LEV12, a fatal error results. 

Placing a call for a secondary overlay for which the corresponding 
primary overlay is not already loaded causes a fatal error. A fatal 
error also results if the primary and secondary overlays are not both on 
the named ovldn. 



TYPE 2 OVERLAY STRUCTURE 

Figure 14-3 shows an example of a tree structure of the Type 2 overlay. 
There is only one root overlay, and its level number is 0. The root 
overlay remains in memory during program execution and calls only level 1 
overlays. Only one branch is in memory at any time. Overlay (2,1) under 
overlay (1,1) is different from the (2,1) under (1,5). Moreover, overlay 
(2,1) under overlay (1,1) can be called only by overlay (1,1) 

Figure 14-4 shows a sample Type 2 overlay loading diagram. The overlays 
are shown in time sequence. The sequence of generation does not imply 
that the programs are loaded into memory in the same sequence or that 
they remain in memory for a set period of time when they are executed. 
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Figure 14-3. Example of the Type 2 overlay tree 
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Figure 14-4. Example of Type 2 overlay loading 
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Level 1 overlays are called at various times by the root overlay. Each 
call loads the named overlay at the same address, immediately following 
the location of the root. The first level overlay must be called by the 
root. Each upper level overlay must be called by the associated overlay 
at the adjacent lower level. A hierarchy exists among overlay levels; 
an upper level overlay is subordinate to the proximate lower level 
overlay. An upper level overlay associated with overlay (2,1) might be 
(3,2), (3,3) or (3,4). 

An overlay can call into memory any overlay in the next higher level; it 
cannot call an overlay more than one level above it in the hierarchy. 
For example, overlay (2,1) can call (3,1) through (3,63), but it cannot 
call (4,1) . Each call for an overlay loads the named overlay at the 
same address location immediately following the location of the calling 
overlay. Only the root and one overlay at each level can be in memory 
concurrently. 

All external references must be directed toward an overlay nearer the 
root overlay. Overlay (1,1) can contain references to the root overlay 
but not to overlay (1,2) or overlay (2,1). The (2,1) overlay can 
reference externals in both the (1,1) overlay and the root overlay. 

The loader places named common blocks before the routine that first 
references it. All named common references must be directed toward a 
lower level routine (toward the root overlay). If blank common is 
declared in the root overlay, it is allocated at the highest address of 
the root and is accessible to all overlays. If blank common is declared 
first in a level 1 overlay, for example, and is not declared in the root 
overlay, it is accessible only to level 1 and upper level overlays. 

JCHLM is set to the highest address of the root overlay before loading. 
If a subsequent overlay module requires additional memory, JCHLM is 
reset to the highest address of that module. 



TYPE 2 OVERLAY GENERATION DIRECTIVE 

The Type 2 overlay directive defines the structure of the overlay within 
the directive format. 



OVLL directive 

This directive causes relocatable loading of the named blocks of an 
overlay. The size of the lower level overlays in the group determines 
the base location. All members for this directive reside on the same 
dataset, dn, specified by the FILE directive. The first member in the 
list is the one that receives control when the overlay is loaded. For 
programs written in CAL, the first entry point of the first routine 
receives control. 
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Format: 



OVLL,level ,number ,member^ ,membev2 r • • • ,member n , 



level Either a level number of the overlay (1 through 10) , or the 

root phase (0) . If the root phase is being generated, 
number must be omitted. 

number Number of the overlay (1 through 63) within the level 

member Module names for the individual overlays 

Generation directive example 

In the following example, 

DSET1 contains routines THETA, TEST, GAMMA, SUB1, MAIN, SUB2. 

DSET2 contains routines NEW2, ALPHA, OVER, NEW1, DELTA, EPSILON, 

SIGMA, BETA. 



Format of the control statement that initializes overlay generation: 

LDR, . . . ,OVL=0VLIN, . . . 
Dataset OVLIN contains the following directives: 

FILE,DSET1. Loader selectively loads from dataset DSET1. 

OVLDN,LEV00. The following overlay modules are written to the 

dataset LEV00. 

* 

OVLL,0,MAIN,SUB1, The absolute binary of MAIN,SUB1,SUB2 is the first 

record on dataset LEV00. 



SUB2. 

OVLL, 1,1, TEST. 

FILE,DSET2. 
0VLL,2,1,NEW1. 

OVLDN,LEV12. 



The binary of TEST is binary record 2 on dataset 
LEV00. 

Loader selectively loads from dataset DSET2. 

The binary of NEW1 is binary record 3 on dataset 
LEV00. 

The subsequent overlay modules are written to the 
dataset LEV12. 



SR-0011 



14-30 



M 



OVLL,2,2,NEW2. The binary of NEW2 is binary record 1 on dataset 

LEVI 2. 

OVLL, 3,1, ALPHA. The binary of ALPHA is binary record 2 on dataset 

LEV12. 

OVLL, 3, 2, BETA. The binary of BETA is binary record 3 on dataset 

LEV12. 



eof End of overlay load sequence. 



TYPE 2 OVERLAY GENERATION RULES 

1. Overlay members are loaded from datasets named in FILE 
directives. Members are searched for in the most recently 
mentioned dataset only. In the absence of a FILE directive, 
members are loaded from the dataset specified on the LDR control 
statement. If that is also omitted, loading initially occurs 
from $BLD. 

2. The overlays are generated in the order of the directives. 

3. There must be one and only one root per dataset. 

4. Level hierarchy must be maintained. The root overlay must be 
generated first. Following the root generation, a first level 
overlay is generated. No limitation is placed on which overlay 
number is generated? however, all overlays associated with that 
first level overlay must follow. The overlays can be generated 
in any order; the same restrictions apply for all levels of 
overlays (1 through 10) . 

5. The first level overlay must be called by the root. An overlay 
can call into memory any overlay in the next higher level. 
However, an overlay cannot call an overlay that is more than 
one level above it in the hierarchy. 

6. An end-of-file ends the input of overlay directives. 

7. Any directive other than FILE, OVLDN, SBCA or OVLL causes a 
fatal error. 

8. The list of members can be continued to another line by using a 
caret immediately following the last character at the end of the 
directive line (that is, no blanks) . The caret does not replace 
a separator and must not appear within a member name. 

9. Any number of lines can name the members of an overlay. 
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TYPE 2 OVERLAY EXECUTION 

A control statement call of the dataset containing the root overlay 
initiates the root overlay's loading and execution. If no OVLDN 
directives are used before generating the root, the dataset $OBD 
contains the root overlay. All overlays reside on the datasets 
specified on the overlay directives. The entry for higher level 
overlays is defined by the first member listed on the generation 
directive. Control is transferred to this address after loading by the 
$OVERLAY routine during program execution. The root entry is named 
using the T parameter on the LDR control statement. 

The following sequence executes the root overlay after generation: 

LDR, . . . ,OVL=dir , . . . . 
$OBD. 

When the program is to be executed, the root overlay is brought into 
memory as a result of a control statement call in the job deck. 
Thereafter, additional overlays are called into memory by the executing 
program. Overlay loading allows any overlay to call for the loading of 
an adjacent upper level overlay. 

The user calls for the loading of Type 2 overlays from within the 
program, and the method by which they are called depends on the program 
language in use (FORTRAN or CAL) . OVERLAY is a subroutine of the root 
overlay and is loaded into memory with the root. 



FORTRAN language call 

A FORTRAN program calls for the loading of Type 2 overlays as follows: 



CALL OVERLAY (nLdn, level, number, r) 



n Number of characters in the name 

L Left'-adjusted; zero-filled. 

dn Dataset name where this overlay resides 

level Level number of the overlay 

number Number of the overlay within the level 

v Optional recall parameter. If the user wishes to 

re-execute an overlay without reloading it, 6LRECALL is 
entered. If not currently loaded, it will be loaded. 
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CAL language call 

A sample call sequence from a CAL program is as follows 



Location 


Result 


Operand 




EXT 

• 


OVERLAY 

• 




• 
• 

CALL 

• 


• 
• 

OVERLAY , (OVLDN , PLEV, SLEV) 

• 


OVLDN 

PLEV 

SLEV 


• 
• 

CON 
CON 
CON 


• 

A , LEV12 , L 

2 





where OVLDN is the address of the dataset name, PLEV is the address of 
the primary level, and SLEV is the address of the secondary level. If 
recall is desired, the address of the literal 'RECALL 1 is transmitted as 
the fourth argument. 



Example : 



Location 


Result 


Operand 


Comment 


1 


10 


20 


35 


RECL 


CALL 

• 

• 
• 

CON 


OVERLAY, (OVLDN,! 

• 
• 

• RECALL 'L 


►LEV, SLEV, RECL) 



For both FORTRAN and CAL language calls, during execution of the ROOT 
program MAIN, the statement 

CALL OVERLAY (5LLEV1 2, 1,2) , or above CAL sample call 

causes OVERLAY to search dataset LEV12 for the absolute binary named 2. 
OVERLAY positions the dataset LEV12 to the location of the absolute 
binary named 2 using information supplied by the loader, loads the 
overlay, and transfers control to the first member specified on the OVLL 
directive. After execution of the overlay, control returns to the 
statement in MAIN immediately following the CALL statement. Following 
the load, dataset LEV12 is positioned immediately after the end of record 
for the overlay 2. If overlay 2 is not on dataset LEV12, a fatal error 
results. 
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OVERLAY GENERATION LOG 

When MAP is specified on the LDR control statement, a listing is obtained 
describing where each module is loaded and what entry points and external 
symbols are used for loading. This listing is an overlay load map and is 
similar to the map of a nonoverlay load. A log of the directives used 
follows the map of the last overlay generated. If overlay loading 
aborts, the directives are not listed. 
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OBJECT LIBRARY MANAGEMENT 15 



BUILD is an operating system utility program for generating and 
maintaining library datasets. A library dataset contains a program 
file followed by a directory file. Library datasets primarily provide 
the loader a means of rapidly locating and accessing program modules. 
The program file is composed of loader tables for one or more absolute 
or relocatable program modules. The directory file contains an entry 
for each program. The entry contains the name of the program module; 
the relative location of the program module in the dataset; and block 
names, entry names, and external names. 

The BUILD program constructs a library from one or more input datasets 
named by the user when BUILD is called. A library dataset created by 
a BUILD run can be used as input to a subsequent BUILD run. Through 
BUILD directives, the user designates the program modules to be copied 
from the input datasets to the new library and their order in the 
library. However, no directives or control statement parameters are 
needed for the most frequent application of BUILD, which is to add new 
binaries from $BLD to an existing library of binary programs, 
replacing the old binaries where necessary. 

BUILD does not use tape datasets. 



BUILD CONTROL STATEMENT 



Format : 



BUILD, I=idn ,L=ldn ,OBL=odn ,B=bdn ,mh=mdn , SORT, NODIR, REPLACE. 



Parameters are in keyword form. 

l=idn Name of dataset containing BUILD directives, if any. 

Directives can be included in the $IN dataset, or they can 
be submitted in a separate dataset. 

If the I parameter appears alone or is omitted, all 
directives are taken from the $IN dataset, starting at its 
current position and stopping when an end-of-file is read. 
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If I=ddn, all directives are taken from the specified 
dataset, ddn, stopping when an end-of-file is read. 

If 1=0, no directives are read. The most common condition 
is to merge the modules from odn (the OBL dataset) with 
those from bdn (the B dataset) , replacing OBL modules 
with B modules whenever the names conflict, and to write 
the output to ndn (the NBL dataset) . Note that the input 
dataset specified by the B parameter corresponds to the 
binary output from CAL and CFT, also designated by B. 

L=ldn Name of list output dataset. 

If the L keyword appears alone or is omitted, list output 
is written to $OUT. 

If "L-Xdn, list output is written to Idn. 

If L=0, no list output is written. 

OBL-odn Name of the first input dataset, usually a previously 
created library dataset. 

If the OBL parameter is omitted or appears alone, the 
first dataset read is $OBL. 

If 0BL=odn, the first dataset read is odn> 

If OBL=0, no old binary library exists. This is a 
creation run. 

B=bdn Name of the second input dataset, whose modules will be 

added to or will replace the modules in the first 
dataset. 

If the B parameter appears alone or is omitted, the 
second dataset read is $BLD. 

If B=bdn is specified, the second dataset read is 
bdn, which is read to the first end-of-file. 

If B=0, no modules are being added. This run edits an 
old library. 

lXBL=ndn Name of the output dataset, usually a new library 

dataset. If the NODIR parameter is also present, ndn 
is not in library format. 

If the NBL parameter appears alone or is omitted, output 
is written to $NBL. 
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If HBL=ndn, output is written to ndn. 

If NBIr=0, no output is written. 

SORT Specifies that all modules are to be listed 

alphabetically according to their new names. The 
default is to list the modules in the order they are 
first read. Note that SORT only applies to the list 
dataset and not to the output library. 

NODIR Specifies that no directory is to be appended to the 
output dataset, resulting in an ordinary sequential 
dataset like $BLD. The default is to append the 
directory. 

The dataset ndn specified by NBL is not rewound if 
NODIR is specified. 

REPLACE Specifies that the output library is to contain modules in 
the same order as the old library. If omitted, the new 
library contains modules from the old library which are not 
replaced by modules from the input binary dataset, followed 
by modules from the input dataset, whether the module from 
the input dataset replace modules from the old library, or 
are new, in the order encountered on the input dataset. 

Any of the following errors causes BUILD to abort: 

• A module specified explicitly in a COPY or OMIT directive is 
not in the current input dataset. 

• A module specified explicitly in a COPY directive has already 
been selected for output. 

• Improper syntax is used in the BUILD control statement or in 
the directive dataset. 

• An unrecognized directive or control statement keyword is used. 

• A dataset name or module name is too long or contains illegal 
characters. 



PROGRAM MODULE NAMES 

BUILD directives refer to program modules by their names as given in 
the directory or, if the directory is missing or is unrecognizable, by 
the names given in the program modules. 
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PROGRAM MODULE GROUPS 

In the COPY and OMIT directives, program modules with names containing 
one or more identical groups of characters can be specified together. 
To accomplish this, variable parts of each name are replaced by one or 
more hyphens. For example, XYZ- represents all names beginning with 
XYZ, including XYZ itself. In the extreme case, a name consisting of 
only a hyphen represents all possible names. 

In addition, up to eight asterisks can be used anywhere in a name as 
wild characters matching any character other than a blank. For 
example, GE* specifies a group of modules having 3-character names 
including GET and GEM but not GE or GEMS, although GE*S could 
represent GEMS. 



PROGRAM MODULE RANGES 

In order to facilitate the copying of large numbers of contiguous 
program modules, the COPY directive allows use of a range specifier 
instead of a single name or group specifier. The range specifier has 
the general form: 



(first , last) 



which means: skip to the first module specified and copy all modules 
from the first up to and including the last module specified. 



FILE OUTPUT SEQUENCE 

If the SORT parameter appears in the BUILD control statement, all 
modules are copied alphabetically according to their new names. In 
the absence of a SORT parameter, modules are written in the order they 
are originally read from the input datasets. 

The order of the entries in the directory is always the same as the 
order of the modules themselves. 
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FILE SEARCHING CONSIDERATIONS 

The user need not be aware of the order of modules in the input 
dataset unless (1) two or more modules have the same name or (2) a 
range is specified in a COPY directive. 

If two or more modules with the same name are in the input datasets, 
the last of the modules read is the one that survives, unless the user 
specifically omits that last module while its original dataset is the 
currently active input dataset. 

The concept of current position in the input file is used to interpret 
range specifiers where the first name is omitted as in (,last) or (,). 
In such cases, the current position is defined to be either immediately 
after the last module copied or at the beginning of the dataset if no 
modules have yet been copied. 



BUILD DIRECTIVES 

BUILD is controlled through directives in a dataset defined by the I 
parameter on the BUILD control statement. A directive consists of a 
keyword and, if the keyword requires it, a list of dataset names or 
module names. When names are required, the keyword must be separated 
from the first name by a blank; subsequent names (if any) in the list are 
separated from each other by commas. Extra blanks are optional except 
within the keyword. 

A line can contain more than one directive; periods or semicolons are 
used to separate directives on the same line from each other. A 
directive cannot be continued from one directive line to the next. 



Examples of directives: 

OMIT ENCODE, DECODE 

COPY **CODE. 
Examples of multiple directives on one line: 

FROM OLDLIB; LIST; OMIT ENCODE , DECODE , XLATE 

FROM $BLD. LIST. 
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FROM DIRECTIVE 

A FROM directive names a single dataset, which is thus established as 
the input dataset for succeeding COPY, OMIT, and LIST directives, or 
it lists several datasets that (except for the last dataset in the 
list) are to be copied in their entirety to the output dataset 
($NBL) . The last dataset in the list is established as the current 
input dataset, just as if it were specified alone in the FROM 
directive. If no COPY or OMIT directive follows, the last dataset is 
also copied in its entirety to the output dataset. 

An input dataset can be a library (with a directory) or an ordinary 
sequential dataset (such as $BLD) . BUILD always determines whether a 
directory is present at the end of the dataset and attempts to use it 
if it is there. A library dataset is treated as sequential if its 
directory file is unrecognizable any reason. 



Format : 



FROM dni,dn 2 , . . . ,dn n 



The following rule allows the user to copy several datasets with one 
FROM directive or to omit COPY (which means copy all) when it would be 
the only directive (except for OMIT directives) in the range of a 
particular FROM directive: 

If any dataset named on a FROM directive is not acted on by any 
LIST or COPY directive, then BUILD copies all of the modules 
belonging to that dataset. BUILD takes this action when it 
encounters the next FROM dataset name or the end of the directive 
file, whichever comes first. 

If there are two input datasets to be read as soon as BUILD begins to 
execute (that is, if neither OBL=0 nor B=0 is specified), the modules 
from these two datasets are treated as if they belong to a single 
dataset as far as the OMIT, COPY, and LIST directives are concerned. 
However, if either of them is named in a FROM directive, it is treated 
as a separate dataset and OMIT, COPY, and LIST directives apply only 
to whichever is the current input dataset. 



OMIT DIRECTIVE 

The OMIT directive allows a user to specify certain modules otherwise 

included in a group be omitted from the group on subsequent copy 
operations. An OMIT affects modules on the current input dataset 
only; its effect ends when a FROM directive is encountered. 
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Format : 



OMIT fn lt fn 2 ,...,fn 



Each fn^ can be one of the following: 

• A single name, such as $AB@CDEF or CAB22, by which binary 
records can be explicitly prevented from being copied, or 

• A group name, such as F$- or *AB**, by which binary records are 
prevented from being copied unless they are specified 
explicitly (that is, singly) in a COPY directive (see the 
introduction to this chapter under Program Module Groups for a 
description of * and - usage) . 

If an fn parameter specifies a module not in the input dataset or a 
group of modules having no representatives in the input dataset, a 
diagnostic message is included in the list output and BUILD aborts. 



COPY DIRECTIVE 

COPY directives cause BUILD to select the specified modules for 
copying from current input dataset to the output dataset. The user 
specifies single modules, groups of modules, or ranges of modules to 
be copied. If the user specifies a module not in the current input 
dataset, a diagnostic message is included in the list output and BUILD 
aborts. 



Format : 



COPY fn lt fn 2 ,... t fn n 



Each fn^ is either of the two forms valid in OMIT directives: 

• A single module name by which modules are explicitly selected 
for copying even if they belong to a group named in a previous 
OMIT directive, or 

• A group specifier by which all the modules in the group are 
selected for copying unless they are specified either 
explicitly or implicitly in a previous OMIT directive. 
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In addition, two special forms are allowed for each fn^ in COPY 
directives: 

• A form to rename a single module whose old name is specified 
explicitly; for example, OLDNAME=NEWNAME . (The name is changed 
both in the output directory and in the module's Program 
Description Table.) 

• A form to copy an inclusive range, as in (FIRST, LAST) , by which 
all the modules in the range are selected for copying unless 
they are specified either explicitly or implicitly in a 
previous OMIT directive. 

These two forms are mutually exclusive. A module copied by being 
included in a range cannot at the same time be renamed. Nor can 
either form accept a hyphen or asterisk specifying a group of modules. 



Examples : 

BUOROACH Copies BUG, renaming it to ROACH 

(LOKI,THOR) Copies all modules from LOKI through THOR 

(THOTH,) Copies all modules from THOTH to the end of the 
input data set 

(,ISIS) Copies all modules from the current dataset 
position through ISIS 

( , ) Copies all modules from the current dataset 

position to the end of the input dataset 

The current dataset position is defined as the beginning of the input 
dataset if no modules have been selected for copying yet, or else as 
the beginning of the record immediately after the last module that has 
been selected for copying. 



LIST DIRECTIVE 

The LIST directive tells BUILD to list the characteristics of the 
modules in the current input dataset. Its effect is immediate. 
(BUILD'S standard list output describes the contents of the output 
dataset and is produced at the end of the run so as not to interfere 
with output triggered by LIST directives.) 
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Format : 




EXAMPLES 

The following are examples of various uses of the BUILD program: 

• Creating a new library dataset, using as input whatever binary 
modules have been written out to $BLD (for example, by CAL 
and/or CFT) . 

Control statements: 

BUILD, OBL=0, 1=0. 

SAVE , DN=$NBL , PDN=MYLIB . 



Adding one or more modules to an already existing library 
dataset, again taking the input from $BLD. 

Control statements: 

ACCESS , DN=$OBL , PDN=MYLIB . 

BUILD, 1=0. 

SAVE , DN=$NBL , PDN=MYLIB . 



Any modules whose names were already in the directory of MYLIB 
are replaced by the new binaries from $BLD in the new edition 
of MYLIB that is created by BUILD and saved by the SAVE control 
statement. 



Merging several libraries. 

Control statements: 

ACCESS , DN=LIBONE , PDN=HERLIB . 

ACCESS , DN=LIBTWO , PDN=HISLIB . 

ACCESS , DN=ANOTHER, PDN=ITSLIB . 

ACCESS , DN=LASTONE , PDN=MYLIB . 

BUILD,I,OBL=0,B=0. 

SAVE , DN=$NBL , PDN=NEWLIB . 
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Directives: 

FROM LIBTWO,ANOTHER,LIBONE,LASTONE 

The order of the dataset names in the FROM directives, not the 
order of the ACCESS control statements, determines the order of 
processing. If two datasets contain modules of the same name, 
the surviving module is the one in the dataset whose name 
occurs later in the FROM directive. (Any module could be 
renamed before input from a succeeding dataset is begun, in 
order to prevent it from being discarded. Note the section on 
File Searching Considerations in the introduction to this 
chapter for a description of the interaction with OMIT 
directives.) 

Deleting a program module from a library. 

Control statements: 

ACCESS , DN=$OBL , PDN=*MYLIB . 

BUILD, B=0. 

SAVE , DN=$NBL , PDN=MYLIB . 



Directive: 

OMIT BADPROG 

Extracting a program module from a library for input to the 
system loader, using the local dataset name $BLD as the 
intermediate file. 

Control statements: 

ACCESS , DN=XXX , PDN=MYLIB . 

BUILD , I , OBL=XXX , B= , NBL=$BLD , NODIR . 



Directive: 

COPY RUNPROG 
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JOB CONTROL LANGUAGE 16 

STRUCTURES 



This section discusses three aspects of job control language structures: 

• Control statements 

• Job control language expressions 

• Procedures 



CONTROL STATEMENTS 

The COS job control language allows three fundamental logic structures: 

• Simple control statement sequences. Control statements are 
processed one after another . 

• Conditional control statement blocks, A sequence of control 
statements is processed only if the specified condition is met. 

• Iterative control statement blocks. A sequence of control 
statements is processed repetitively until the specified condition 
is met. 

Most computer algorithms can be expressed in terms of the three above 
structures or as combinations of them. 



SIMPLE CONTROL STATEMENT SEQUENCES 

A simple control statement sequence is a series of one or more of the 
control statements described in sections 6 through 15 of this manual. 
The individual control statements are processed sequentially as described 
in section 3 of this manual. 
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CONDITIONAL CONTROL STATEMENT BLOCKS 

A conditional control statement block is a group of control statements 
that is processed only if a specified condition is met. The control 
statements IF, ELSE, ELSEIF, EXITIF, and ENDIF allow other control 
statements to be placed in a conditional block structure. 

• IF defines the beginning of a conditional block. 

• ENDIF defines the end of a conditional block. 

• ELSE is used to define an alternate condition. 

• ELSEIF defines an alternate condition to test when the previous 
one tested is false. 

• EXITIF defines a condition which causes an escape from a 
conditional block. 

ELSE, ELSEIF, and EXITIF sequences are optional. 

IF - Begin conditional block 

The IF control statement defines the beginning of a conditional block. 
Each IF control statement must have a corresponding ENDIF control 
statement. IF is a system verb. 

Format : 



IF (expression) 



Parameter: 

expression 



A valid JCL expression (discussed later in this section) . 
This parameter is required. 



ENDIF - End conditional block 

The ENDIF control statement defines the end of a conditional block. ENDIF 
is a system verb. 
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Format: 



ENDIF. 



Parameters: None 



ELSE - Define alternate condition 

The ELSE control statement is used to define an alternate condition. An 
IF statement, as well as any ELSEIF statements, must precede the ELSE 
control statement. If all conditions specified by the IF and ELSEIF 
statements that precede the ELSE in the conditional block test as false, 
then the sequence of statements that follow the ELSE statement is executed, 

Within a conditional block, only one ELSE sequence is permitted. The ELSE 
statement, if present, must follow any ELSEIF statement. 

ELSE is a system verb. 



Format : 



ELSE. 



Parameters: None 



ELSEIF - Define alternate condition 

The ELSEIF control statement defines an alternate condition to test if the 
previously tested condition was false. The sequence of statements 
following the ELSEIF statement is executed when the ELSEIF expression is 
true. All ELSEIF control statements must precede the optional ELSE 
control statement for a conditional block. An ELSEIF statement without a 
previously processed IF statement results in a job step abort. An 
unlimited number of ELSEIF sequences can be used in a conditional block. 

ELSEIF is a system verb. 



Format: 



ELSEIF (expression) 
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Parameter: 

expression 

A valid JCL expression (discussed later in this section) . 
This parameter is required. 

A conditional block can contain any number of ELSEIF control statements. 
The block of control statements following an ELSEIF statement is processed 
under the following conditions: 

• The expression for the IF statement is false. 

• All preceding ELSEIF statement expressions are false. 

• The ELSEIF expression is true. 

EXITIF - Exit from conditional block 

The EXITIF control statement defines the conditions that must be met so 
that the remaining control statements in the conditional block are 
skipped. EXITIF is a means of skipping to the ENDIF statement without 
regard to EXIT statements. If the EXITIF expression is true, the 
remainder of the conditional block is skipped; if the expression is false, 
the control statements which follow the EXITIF statement are executed. 

EXITIF may appear anywhere within a conditional block. An EXITIF 
statement that is not within a conditional block causes a job step abort. 
When conditional blocks are nested, the EXITIF control statement applies 
to the innermost conditional block which contains it. 

EXITIF is a system verb. 
Formats : 



EXITIF. 

EXITIF (expression) 



Parameter : 

expression 



A valid JCL expression (discussed later in this section) . 
If expression is omitted, the remainder of the block is 
skipped unconditionally. 
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Conditional block structures 

The conditional block is first scanned to verify the validity of the 
block's syntax. If any syntax errors exist, the block is skipped without 
being evaluated and a job step abort error occurs. Note that any EXIT 
control statements within the conditional block are ignored when a syntax 
error exists in that conditional block. This validation occurs when the 
control statement file, where it is contained, is invoked. (Validation 
occurs at job initiation if the control statement file is $CS; it can also 
occur at the time that a procedure is invoked, or when a CALL statement is 
encountered.) 

Null sequences (for example, an ELSE statement immediately following an 
ELSEIF) are ignored without comment. 

Conditional blocks can be constructed in the following ways: 

• Basic conditional block 

• Conditional block with ELSE 

• Conditional block with ELSEIFs 

• Conditional block with ELSEIFs and ELSE 

Basic conditional block - The format of a basic conditional block (figure 
16-1) begins with an IF statement and ends with an ENDIF statement. When 
the IF statement expression is true, the control statement sequence that 
follows is processed. If the expression is false, the control statement 
sequence is not processed. 




Figure 16-1. Basic conditional block structure 
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Example : 

Following is an example of the conditional block structure. 

ACCESS , DN=MYPROG . 

MYPROG. 

EXIT. 

IF(PDMST.EQ.l) 
* 

*. UNEXPECTED JOB STEP ABORT ERROR 

• 

EXIT. 
ENDIF. 

In this example, if the ACCESS request or execution of MYPROG fails, the 
conditional block after the EXIT control statement is processed. The 
conditional block determines if the job step abort occurred because the 
ACCESS (for example, the dataset was not found), in which case the 
processing of control statements resumes after the ENDIF control 
statement. If this is not the reason for the abort, the job terminates 
with the EXIT control statement. 

Following is an example of a conditional block using EXITIF. 

ACCESS , DN=MYPROG , NA . 
IF(PDMST.NE.l) 

UPDATE ( Q=MYPROG ) 

CFT(I=$CPL,ON=A) 

LDR ( AB=MYPROG , NX , USA) 

SAVE ( DN=MYPROG , NA) 

EXITIF. 

EXIT. 
* 

*. ERROR GENERATING MYPROG 

*. 

EXIT. 
ENDIF. 
MYPROG. 

In this example, a conditional block is used to generate a dataset if that 
dataset is not found. EXITIF is used to skip the remaining statements in 
the conditional block if the dataset is generated successfully. 
Otherwise, the job terminates. 

Conditional block with ELSE - The second conditional block structure 
includes the ELSE control statement. The control statement sequence is 
processed if the expression on the IF statement is true. If the 
expression is not true, the sequence following the ELSE statement is 
processed. The block structure is illustrated in figure 16-2. 
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control statement 
sequence 



ELSE. 




control statement 
sequence 




Figure 16-2. Conditional block structure including ELSE 



Example : 

An example of a conditional block structure using the ELSE statement 
follows . 

ACCESS , DN=INITJCL . 
ACCESS , DN=PREPROG . 
ACCESS, DN=PROG. 
PREPROG. 
IF(JSR.NE.O) 

CALL,DN=INITJCL. 

SWITCH, l=ON. 
ELSE. 

SWITCH, l=OFF. 
ENDIF. 
PROG. 

After PREPROG is executed, the conditional block determines if PREPROG has 
successfully executed (by its setting of JSR) . The procedure INITJCL 
is executed and a sense switch is set if JSR is nonzero. The sense 
switch is cleared if PREPROG set JSR to zero. 

Conditional block with ELSEIF - The third conditional block structure 
(figure 16-3) includes one or more ELSEIF statements. Each logical 
expression on the IF and ELSEIF statements is tested in sequence until a 
true condition is found; then the corresponding control statement sequence 
is processed. 
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control statement 
sequence 



ELSEI3F [expression) 




Figure 16-3. Conditional block structure including ELSEIF 

A conditional block can contain any number of ELSEIF control statements. 
The block of control statements following an ELSEIF statement is processed 
under the following conditions: 

• The expression for the IF statement is false. 

• All preceding ELSEIF statement expressions are false. 

• The ELSEIF expression is true. 



Example : 

An example of a deck including the ELSEIF statement is: 

IF(SYSID.EQ. 'COS 1.07') 

ACCESS , DN=$FTLIB , ID=V107 . 
ELSEIF (SYS ID. EQ. ' COS 1.08') 

ACCESS, DN=$FTLIB,ID=V10 8. 
ELSEIF (SYSID.EQ. 'COS 1.09') 

ACCESS , DN=$FTLIB , ID=V109 . 
END IF. 
LDR , NOLIB , LIB=$FTLIB . 

This conditional block tries to access the correct version of the FORTRAN 
library, $FTLIB, for the execution of the loader following the conditional 
block . 
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Conditional block with ELSEIF and ELSE - The fourth conditional block 
structure, shown in figure 16-4, uses ELSEIF and the ELSE statements. A 
block can contain any number of ELSEIF statements but can contain only one 
ELSE, which must be the last conditional statement before the ENDIF. 

The ELSE control statement sequence in this case is processed only if: 

• The expression on the IF statement is false, and 

• All ELSEIF statement expressions are also false. 




control statement 
sequence 



ELSEIF (expression ) 




Figure 16-4. 



Conditional block structure including 
ELSEIF and ELSE 



Example : 

This example is an expansion of the example for the third format and 
allows execution of the compiled program if there is enough time left and 
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if the correct library is accessible. On a successful run, the dataset 
called RESULTS is disposed as a staged dataset. 

I F ( TIMELEFT . GT . 1 7 5 ) 

IF(SYSID.EQ.'COS 1.08') 

ACCESS , DN=$FTLIB , ID=V108 . 
ELSEIF(SYSID.EQ.'COS 1.09') 

ACCESS , DN=$FTLIB , ID=V109 . 
ELSE. 

*. CURRENT SYSTEM LEVEL NOT RECENT ENOUGH 
* 

• 

EXIT. 

ENDIF. 

LDR,NOLIB,LIB=$FTLIB. 

SET,J1=*YES'L. 
ELSE. 

SETjJl^NOTIME'L. 
ENDIF. 
IF(J1.EQ. 'YES'L) 

DISPOSE , DN=RESULTS , DC=ST . 
ELSE. 

• 

*. JOB DID NOT RUN TO NORMAL COMPLETION 
ENDIF. 
EXIT. 



ITERATIVE CONTROL STATEMENT BLOCKS 

An iterative control statement block is the third fundamental logic 
structure allowed by the COS job control language. It contains a control 
statement sequence that is to be processed more than once during the 
processing of a job. 

• LOOP defines the beginning of an iterative block. 

• ENDLOOP defines the end of an iterative control statement block. 

• EXITLOOP defines the conditions under which the control statement 
block iteration is to end. 

LOOP - Begin iterative block 

The LOOP control statement is required to define the beginning of an 
iterative block. An ENDLOOP control statement is required at the same 
nesting level to terminate the iterative block. LOOP is a system verb. 
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Format : 




Parameters: None 



ENDLOOP - End iterative block 

The ENDLOOP control statement terminates an iterative control statement 
block. If an ENDLOOP control statement occurs without a preceding LOOP 
statement at the same nesting level, a job step abort occurs. Execution 
of the ENDLOOP statement results in control being passed to the preceding 
LOOP statement which begins another iteration of the loop. 



Format: 



ENDLOOP. 



Parameters: None 



EXITLOOP - End iteration 

The EXITLOOP control statement defines the conditions under which the 
control statement block iteration is to end. If its expression is true, 
the loop is exited; if it is false, the control statements which follow 
are executed. 

An EXITLOOP statement that does not appear within an iterative block 
causes a job step abort. When nesting iterative control statement blocks, 
the EXITLOOP control statement defines the exit conditions for only the 
most immediate iterative block. EXITLOOP is a system verb. 



Formats : 



EXITLOOP. 

EXITLOOP (expression) 
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Parameter: 

expression 



Optional valid JCL expression (discussed later in this 
section). If omitted, an unconditional exit from the 
iterative block occurs. 

Figure 16-5 illustrates an iterative control statement block. 



ENDLOOP. 




control statement 
sequence 



EX I TL00P( expression) 




control statement 
sequence 




Figure 16-5. Iterative block structure 



Iterative blocks are prescanned for syntax errors before actual processing 
begins. Any errors in the block structure cause a skipping of that block 
followed by a job step abort. If an iterative block is included within a 
conditional block, it must be totally contained within that conditional 
block. 



Example : 

The following example merges the two datasets DSIN1 and DSIN2 for 60 
records. 

SET,J1=0. 
SET f J2=60. 
LOOP . 

EXITLOOP(J2.EQ.O) 
IF(Jl.EQ.O) 

COPYR, I=DSIN1 ,0=OUTDS . 
SET,J1=1. 
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ELSE. 
COPYR, I=DSIN2 , 0=OUTDS . 
SET,J1=0. 
ENDIF. 

SET,J2=J2-1. 
ENDLOOP. 
REWIND , DN=DSIN1 : DSIN2 : OUTDS . 



JOB CONTROL LANGUAGE EXPRESSIONS 

Much of the power of the control statements described in this section 
derives from the use of expressions. Expressions allow operations such 
as incrementing counters, checking error codes, and comparing strings. 

An expression is a string consisting of operands and operators. 
Expressions are evaluated from left to right, honoring nested parentheses 
and operator hierarchy. This subsection begins by defining operands and 
operators, and ends by discussing expression evaluation and strings. 



OPERANDS 

Expression operands are of four types: 

• Integer constants 

• Literal constants 

• Symbolic variables 

• Subexpressions 

Integer constants 

An integer constant is a character string with two possible forms: 
+ ddd. . . 

nnn. . .B 

d is a decimal digit and n is an octal digit. 

An integer constant has an approximate decimal range 0<JI|<L0 19 . Range 
overflow is not detected and overflow results may be unpredictable. 
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Literal constants 

A literal constant is a string of one to eight characters of the form: 

CCC» • • L 
% CCC.,, 'R 

CCCm . . H 

e is a character code with an ordinal number in the the range 040 
(octal) through 176. The value of a character constant corresponds to 
the ASCII character codes positioned within a 64-bit word. Alignment is 
indicated by the following suffixes: 



L Left-adjusted, zero-filled 
R Right-adjusted, zero-filled 
H Left-adjusted, space-filled . 

If no suffix is supplied, H is assumed, 



Symbolic variables 

A symbolic variable is a string of one to eight alphanumeric characters, 
beginning with an alphabetic character. 

A symbolic variable always has an associated value. COS defines a set of 
symbols when the job is initiated. Symbols are mnemonics for values 
maintained by COS and/or the user. The user can manipulate the group of 
symbols listed in table 16-1 through COS control statements or through 
system requests. 

Certain symbols allow communication between COS and the job being 
processed. Used in the JCL block control statements defined in this 
section, these symbols provide the user with powerful tools for analyzing 
the progress of a job. For example, a job can request the reason for an 
abort situation and proceed, based on the reply from COS, through the use 
of conditional control statements. 

Symbols that are preserved over subprocedure calls are called local to 
a procedure; they are saved when a subprocedure is called. Those that 
are not preserved are global over all procedures and can be altered by 
any procedure. Constants are symbols that are never altered. 

Information on predefined symbols is summarized in table 16-1. In table 
16-1, the only local symbols are JO through J7. 
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Table 16-1. Symbolic variable table 



Symbol 


Set by 


Range 


Description 


J0-J7 


U 


Any 64-bit value 


Job pseudo-registers; represent 
user-alterable data local to a 
procedure. Each procedure level can 
be considered to have its own set of 
J registers. 


G0-G7 


U 


Any 64-bit value 


Global job pseudo-registers; 
represent user-alterable data global 
over all procedure levels. Data can 
be passed into or returned from 
procedures with the G registers. 


JSR 


U 


Any 64-bit value 


Job status register; previous job 
step completion code (normally 0) . 


FL 


S 


0-77777777 8 


Current job field length; can be 
set with MEMORY statement. 


FLM 


S 


0-77777777 8 


Maximum job field length; determined 
by JOB statement. 


SYS ID 


I 


Literal value 


COS system level of the form 
'COS X.XX' 


SID 


I 


Literal value 


Mainframe identifier for front-end 
of job origin; 2 right-justified 
ASCII characters. 


SN 


I 


64-bit integer 


CPU serial number 


SSVln 


S 


(l<n<6) 


Job pseudo sense switch settings; 
can be set with the SWITCH statement. 


ABTCODE 


s 


System error codes 
(See Appendix D) 

Q-nnn 


COS job abort code; abort code 
corresponding to the last job step 
abort. The abort code corresponds 
to the abort message number (the 
nnn in hBnnn) issued by COS. 


TRUE 


I 


-1 


True value 



U User 

S COS 

I System constant 
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Table 16-1. Symbolic variable table (continued) 



Symbol 


Set by 


Range 


Description 


FALSE 


I 





False value 


TIME 


S 


Literal value 


Time of day in the form: 


hh:mm:ss 








DATE 


S 


Literal value 


Date in the form: rrm/dd/yy 


TIMELEFT 


S 


64-bit integer 


Job time remaining in milliseconds 
as an integer value 


PDMFC 


S 


64-bit value 


Most recent user-issued Permanent 
Dataset Manager request. See 
Appendix D. 


PDMST 


S* 


64-bit value 


Status of most recent Permanent 
Dataset Manager request. See 
Appendix D. 



U User 

S COS 

I System constant 



Subexpressions 



A subexpression is an expression that is evaluated so that its result 
becomes an operand. 



OPERATORS 

Expression operators are of three types: 

• Arithmetic 

• Relational 

• Logical 

These operators are used in the FORTRAN sense, 
are detailed in table 16-2. 



The expression operators 
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Table 16-2. Expression operator table 



Type 


Function 


Symbol 


Results 


A 


Addition 


+ 


64-bit sum of operands 


A 


Unary plus 


+ 


Following integer operand is positive. 


A 


Subtraction 


- 


64-bit difference of operands 


A 


Unary minus 


- 


Following integer operand is negative. 


A 


Multiplication 


* 


64-bit product of operands 


A 


Division 


/ 


64-bit quotient of operands 


R 


Equal 


.EQ. 


True/false 


R 


Not equal 


.NE. 


True/false 


R 


Less than 


.LT. 


True/false 


R 


Greater than 


.GT. 


True/false 


R 


Less than or 
equal 


.LE. 


True/false 


R 


Greater than or 
equal 


.GE. 


True/false 


L 


Inclusive OR 


.OR. 


A 1 bit in either operand sets 
corresponding bit in the result. 


L 


Intersection 


.AND. 


A 1 bit in both operands sets 
corresponding bit in the result. 


L 


Exclusive OR 


.XOR. 


A 1 bit is set in the result if 
either (but not both) corresponding 
bit in the operands is 1. 


L 


Unary complement 


.NOT. 


A 1 bit (or 0) is set in the result 
if the corresponding operand bit is 
(or 1). 



A Arithmetic 
R Relational 
L Logical 
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Arithmetic operators 

All arithmetic operations are performed on 64-bit integer quantities. 
Care must be used with arithmetic operators because: 

• Multiplication/division underflow or overflow of the result is not 
detected, 

• Division by zero produces a zero result, and 

• Intermediate and final results are truncated. For example, 
2* (13/2) yields 12 whereas (2*13)/2 yields 13. 



Relational operators 

Relational operations return a -1 value for a TRUE result and a value 
for a false result. A value produced by an arithmetic or logical 
operation is considered true if it is a negative value. 



Logical operators 

Logical operations return a 64-bit result. Their functions are 
performed on a bit-by-bit basis. 



EXPRESSION EVALUATION 

Expressions are evaluated from left to right, honoring nested 
parentheses. The operator hierarchy is: 

1. Multiplication and division 

2. Addition, subtraction, and negation 

3. Relational operation 

4. Complement (.NOT.) 

5. Intersection (.AND.) 

6. Inclusive OR (.OR.) 

7. Exclusive OR (.XOR.) 

Parentheses can be used to change the order of evaluation. For example, 
2+3*4 is evaluated as 14 whereas (2+3) *4 is evaluated as 20. 
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******************************************************* 

CAUTION 

Because COS does not check for type, the results of 
expression evaluation may not be as expected. For 
example, although both Jl.EQ.l and J2.EQ.2 are TRUE, 
(Jl .AND. J2) is FALSE. 

******************************************************* 



STRINGS 

A string is a group of characters which is to be taken literally as a 
parameter value. 

• Strings are normally delimited with apostrophes, in which case 
they are referred to as literal strings. 

• Strings can also be delimited with open and close parentheses, in 
which case they are referred to as parenthetic strings. 

Characters in a string can be any ASCII graphic characters (codes 040s 
through 176g) . 



Literal strings 

Apostrophes are never treated as part of a literal string during 
evaluation except when doubled or when the literal string is a part of an 
expression (see examples) . To continue literal strings across card 
images, place an apostrophe followed by a continuation character at the 
end of the line, and place the remainder of the string on the next card 
image preceded by an apostrophe. Characters otherwise recognized as 
separators are not evaluated as such when part of a literal string. 
Doubled apostrophes within a literal string are interpreted as a single 
apostrophe. A literal string without characters is the null string. 



Examples: 

String 

. . . ' LITERAL STRING ■ 

. . . 'LITERAL STRING' A 
'ACROSS CARD IMAGES' 



Interpretation 
LITERAL STRING 
LITERAL STRINGACROSS CARD IMAGES 
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String 

... 'WON' 'T SHOW 

. . . ' LITERAL A STRING ' 

■ i 

... 

...IF (GO.EQ.'COSl.Ol'L) 



Interpretation 
WON'T SHOW 
LITERAL A STRING 
Null string 
GO.EQ.'COSl.Ol'L 



Parenthetic strings 

There are two main differences between parenthetic strings and literal 
strings: in parenthetic strings, (1) blanks are removed, and (2) some 
separators are evaluated. The separators are evaluated as follows: 

• If apostrophes appear in a parenthetic string, the enclosed 
characters are interpreted as a literal string. 

• The continuation character is interpreted within a parenthetic 
string. 

• Nested parentheses within a parenthetic string are not treated as 
separators. 



Examples: 

String 

(LITERAL STRING) 

(LITERAL STRING 
ACROSS CARD IMAGES) 

(WON"T SHOW) 

(( NESTED PARENTHESES )) 

( STRING 'LITERAL STRING') 

(CLOSED PARENTHESIS ' ) ' ) 

(KEYWORD=ABC . DEF) 

( ) 





Interpretation 

LITERALSTRING 

LITERALSTRINGACROSSCARDIMAGES 

WONTSHOW 

(NESTEDPARENTHESES ) 
STRINGLITERAL STRING 
CLOSEDPARENTHESIS ) 
KEYWORD=ABC.DEF 
Null string 
Null string 
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PROCEDURES 

Just as FORTRAN programs can be divided into separate modules called 
subprograms, control statement sequences can be divided into modules 
called procedures. A procedure is a sequence of control statements 
or data or both that have been saved for processing at a later time. 
Procedures simplify control statement use in three ways: 

• Generalized procedures can be written to perform many similar 
tasks. Work is saved because a new control statement sequence 
need not be written to perform each separate task. 

• Complex control statement structures can be decomposed into 
separate subtasks, with a separate procedure written for each 
subtask. Such modularization reduces the job's design complexity 
and allows each subtask to be individually tested. 

• Procedure libraries can be built. Procedures need be defined only 
once and placed in a library; different jobs and users can use the 
procedures and make them part of their own control statement 
structures. 

Procedures have two formats : 

• A simple procedure consists of only the control statement body. 

• A complex procedure consists of a prototype definition 
statement, control statement body, and optional data. 



SIMPLE PROCEDURES 

A simple procedure is a series of control statements that does not reside 
in the primary control statement dataset ($CS) . No parameter 
substitution occurs in a simple procedure. 

Since a simple procedure has no name associated with it, a simple 
procedure can only reside in a nonlibrary dataset. It therefore, must be 
invoked with the CALL control statement without the CNS parameter. 



Example : 

The first file of dataset MOVER contains five control statements. The 
five control statements can be executed with the following procedure 
calling statement: 

CALL,DN=MOVER. 
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In the above example, interpretation of control statements from dataset 
MOVER terminates when a RETURN statement is encountered (see section 7 of 
this manual) , when the end of the first file (in dataset MOVER) is 
reached, or an EXIT statement. 



COMPLEX PROCEDURES 

A complex procedure provides the capability of replacing values within 
the procedure body with values supplied from the procedure call. These 
values are called substitution parameters and are governed by the 
prototype statement of the procedure. 

A complex procedure can reside in a library or nonlibrary dataset. 

Complex procedures are invoked (executed) in one of two fashions: 

• Procedure name call. The procedure must first reside in a known 
control statement library (either $PROC or a local dataset named 
with a LIBRARY control statement) ; the procedure is called 
(invoked) by using the procedure name as the control statement 
verb. 

• CALL statement call. The procedure must reside in the first file 
of a separate dataset; the dataset is named in the CALL control 
statement. The CNS (crack next statement) parameter must be used 
for the operating system to properly recognize and process the 
procedure prototype statement. PROC and ENDPROC are not used with 
CALL. 

Complex procedures can be defined within the control statement stream 
(in-line definition) or as input to the BUILD utility.^ When 
an in-line procedure definition is encountered in the JCL control 
statement file, it is processed and written to the system default library 
$PROC. See example 8 later in this section for an example of how to 
create a user permanent procedure library. 

A complex procedure can contain formal parameters that define what 
substitution is to occur in the procedure body. A character string that 
is eligible for substitution is listed in the prototype statement as a 
formal parameter specification. This name, when preceded by an 
ampersand in the definition body, indicates that a value is to be 
substituted during procedure invocation. COS replaces the ampersand and 
parameter name with corresponding value supplied by the procedure 
invocation. If the parameter listed in the prototype statement is not 
preceded by an ampersand in the body, substitution does not occur. If 
two ampersands precede the string, one is removed and substitution is 
inhibited. 



t BUILD currently does not suppport procedure entries in libraries. 



SR-0011 16-22 M 



Any string consisting of one through eight characters (ampersand 
included) can be selected for substitution. 

When a statement in the current control statement file calls a procedure, 
COS searches the definition body for the character strings preceded by 
ampersands. For each occurrence, COS substitutes the values supplied by 
either the calling statement or the prototype statement. 

Whereas simple procedures consist only of a control statement body, 
complex procedures contain five elements as shown in figure 16-6. 

• PROC defines the beginning of an in-line procedure definition 
block . 

• The prototype statement specifies the name of the procedure and 
identifies character strings within the procedure that are to be 
substituted when the procedure is called. COS uses values 
supplied with the procedure call and default parameter values from 
the prototype statement to replace these strings. 

• The procedure definition body is a sequence of COS control 
statements processed as part of the current control statement file 
when the procedure is called. It can optionally include lines of 
text data preceded in the definition body by an &DATA control 
statement. 

• &DATA introduces text information to be included in the procedure 
definition body, and names the dataset to be created and written 
to when the procedure is invoked. When the procedure is invoked, 
the named dataset is created and the text information is available 
in that local dataset, including any substitutions resulting from 
the call. This temporary dataset remains local and allows 
programs such as CAL or CFT to use the temporary dataset as source 
data. 

• ENDPROC indicates the end of an in-line procedure definition block. 

The first control statement in an in-line procedure is PROC; the last is 
ENDPROC. A prototype statement follows PROC providing the name of the 
procedure and optionally a list of parameters that identify the 
substitution values within the definition body. 

In addition to defining the values to be substituted, the prototype 
statement parameters control the selection or omission of the parameters 
and define the default value assignments. The control statements and 
data to be processed are contained in the definition body. The control 
statements are grouped in a sequence. 
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ENDPROC. 



definition body 




prototype statement 



PROC. 



\ 




Figure 16-6. Procedure definition deck structure 



If data is included in a procedure, the data is preceded by an &DATA 
statement and follows the control statement sequence. The &DATA 
statement also includes the name of the dataset to which the data is to 
be written after processing so that programs can use the data as source 
data. 

A definition can be placed within a definition; such nesting can occur to 
any level. However, nested definitions do not become defined until the 
outermost procedure is invoked. 



PROC - Begin procedure definition 

The PROC control statement defines the beginning of an in-line procedure 
definition block. PROC is a system verb. 



SR-0011 



16-24 



M 



Format: 




Parameters: None 



Prototype statement - Introduce a procedure 

The prototype control statement has two functions: (1) to specify the 
name of the procedure and (2) to provide the formal parameter 
specifications that define where substitution is to occur within the 
definition body. Value substitution is described later in this section, 



Format : 



name r p lr p 2t P2i 



rP n < 



Parameters : 

name 

Pi 



Procedure name; 1 to 8 alphanumeric characters. The 
name should not be the same as a system verb; if it 
is, the results are unpredictable. 

Formal parameter specifications, using one of the 
formats listed below. A formal parameter identifies a 
character string within the definition body. All 
formal positional parameters, if any, must precede all 
formal keyword parameters; if they do not, the 
procedure definition is in error and the job aborts. 

pos^ Positional formal parameter specification 

key^= dvaluezkvalue 

Keyword formal parameter specification as 
follows : 



keyi 
dvdlue 



Formal keyword parameter 

Optional default value; this 
value is substituted if entire 
keyword parameter is omitted from 
the calling statement. 
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kvalue Optional keyed default value; 

this value is substituted if the 
keyword is present but no value 
is specified. 

Special cases: 

^ e 2/i = Provides no default values and 

requires the caller to provide a 
non-null value. 

keyi=i Provides no default values, 

but allows the user to specify 
key^= or just key^. 



PROCEDURE DEFINITION BODY 

The procedure definition body consists of a sequence of COS control 
statements processed as part of the current control statement file when 
the procedure is called. (It can optionally include lines of text data 
preceded in the definition body by an &DATA control statement. See 
&DATA, which follows.) 

The prototype statement identifies character strings within the 
procedure that are to be substituted when the procedure is called. COS 
uses values supplied with the procedure call and default parameter 
values from the prototype statement to replace these strings. 

An ampersand (&) must precede each parameter to be substituted 
(substitution parameter) within the definition body. If a parameter 
appears in the prototype, a matching string in the body is found but not 
preceded by an ampersand, substitution does not occur. 



&DATA - Procedure data 

Data can be included within the procedure definition body after the 
procedure data card. 

The dn parameter creates a temporary dataset composed of the data 
identified in the procedure, including any substitutions resulting from 
the call. This temporary dataset allows programs such as CAL or CFT to 
use it as source data. 
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Format: 



&DhTh r dn, 



Parameter ; 



dn 



Name of dataset to contain the data that follows; dn is 
required. 



The initial separator for an &DATA statement can be a blank, comma, or 
an open parenthesis; the statement terminator can be a blank, period, or 
a close parenthesis. 

An &DATA specification cannot be continued to subsequent cards. All 
card images following an &DATA card up to the next &DATA card are 
written to the specified dataset after string substitution is 
performed. See example 7 later in this section. 



ENDPROC - End procedure definition 

The ENDPROC control statement indicates the end of an in-line procedure 
definition block. ENDPROC is a system verb. 



Format: 



ENDPROC. 



Parameters: None 



PARAMETER SUBSTITUTION 

Formal parameter specifications can be selected for substitution. 
Character strings to be substituted are delimited by any character other 
than numerals, alphabetics, commercial at (@) , dollar sign ($) , and the 
percent sign (%) . An ASCII underline is used as a string delimiter when 
the next character is one of these characters. See example 3 later in 
this section. COS deletes the underline after evaluating the string it 
delimits. Thus, the underline concatenates the strings it delimits. 

Formal parameter specifications can be in positional or keyword format. 
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Positional parameters 

Positional formal parameters allow the user to list the strings within 
the body that can be substituted. The calling statement lists values to 
be substituted for these strings in the same order in which they are 
listed in the prototype statement. The value supplied with the calling 
statement is substituted for every occurrence of the corresponding 
formal positional parameter within the definition body. If the caller 
passes too few positional parameters, null strings are substituted for 
the remaining formal positional parameters. If too many positional 
parameters are passed, the procedure call is in error and the job aborts. 



Keyword parameters 

Keyword formal parameters are listed in any order after all positional 
parameters are given on the prototype statement and the calling 
statement. A keyword formal parameter allows the user to specify 
substitution values on the prototype statement that are to be used when 
one is not given on the calling statement. 

If the keyword formal parameter is included in the calling statement 
with a value, that value is substituted. If the entire keyword formal 
parameter is omitted from the calling statement, the default value on 
the prototype statement is substituted. If a default value is not 
provided on the prototype statement, the character string within the 
body corresponding to that formal parameter is not included in the 
procedure expansion. 

If only the keyword portion of the keyword formal parameter (the 
character string itself) is included in the calling statement, without a 
value assigned to it, then a keyed default value from the prototype 
statement is substituted. If a keyed default value is not provided on 
the prototype statement, again the character string within the body 
corresponding to that formal parameter is not included in the procedure 
expansion. 

A keyword parameter enclosed in apostrophes ('KEY rvalue') is 
considered a positional parameter. 

The forms of keyword substitution are summarized in table 16-3. 



Positional and keyword parameters 

When supplying both positional and keyword parameters, all positional 
parameters must precede all keyword parameters; COS evaluates the call's 
positional parameters first. The end of the caller's list of positional 
parameters is signaled by the appearance of a keyword parameter, 
statement terminator, or by specifying all positionals. 
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Table 16-3. Keyword substitution after expansion 





Keyword 














v Format for 






key=dv:kv 


key 




Calling 


\ Prototype 


key 


key=:kv 


key=(dv) :kv 


(not 


key=dv 


Statement 


\ Statement 


(positional) 


key=i(kv) 


key=dv: (kv) 


positional) 


key= (dv) 


1. name, 


value. 


Value 


CS119 


CS119 


CS119 and 
CS122 


CS 119 


2. name, 


key. 


CS121 


kv 


kv 


CS121 


CS121 


3 . name. 




Null 


Null 


do 


CS122 


dv 


name, 


(). 












4. name, 


key=value. 


Value 


Value 


Value 


Value 


Value 


5. name, 


key=. 


Null 


Null 


Null 


Null 


Null 



fey=keyword value 
dv=de fault value 



Error messages: 

CS119 - EXTRA POSITIONAL PARAMETER: value 

CS121 - KEYWORD USED WITHOUT ASSIGNING IT A VALUE: 

CS122 - NO VALUE WAS ASSIGNED TO key 



key 



Apostrophes and parentheses 

Sometimes parameter values in a procedure definition or a procedure 
calling statement require a special format. If a literal string (a 
string delimited with apostrophes) appears in either of these 
statements, it is processed as if it were a literal constant. That is, 
all apostrophes in the value remain when the value is substituted. See 
example 5 later in this section. 

To avoid any possibility of erroneous processing, use parentheses as 
string delimiters in these statements. Outermost parentheses preceded 
by the initial, parameter, equivalence, or concatenation separators are 
removed during value substitution. This procedure delays processing of 
any separator characters in the string until the statement itself, with 
substituted values, is processed. 

This delay is also required when specifying multiple values for the 
default value and/or keyed default value parameters on a procedure 
definition statement. See examples 1, 2, 4, and 6. Parentheses are 
advised in the procedure calling statement when the use of the value in 
the procedure statements is unknown. See examples 4, 5, and 6 later in 
this section. 
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The forms of parenthetical substitution are summarized in table 16-4, 



Table 16-4. Expansion of parenthetic and 
literal string values 



Invocation 


Expansion 


value 

(valuel=value2) 
valuel * • • value2 
valuel{.) value2 


value 

valuel=value2 
valuel* . % value2 
valuel. value2 



Examples: 

The following examples demonstrate the COS control statement procedure 
substitution process. 



Example 1: 

Consider a single statement procedure called LOAD defined as follows: 

Definition 

PROC. 

LOAD,NOGO=:NX r LIBRARY=($FTLIB:$SYSLIB) :MYLIB. Prototype statement 

LDR,&N0G0,LIB=&LIBRARY. Definition body 

ENDPROC. 

The prototype statement in this example defines two formal parameters, 
both of which are in keyword format. The keyword NOGO has a null value 
when omitted from the calling statement and a value of NX when included 
on the calling statement in keyword-only format. The keyword LIBRARY 
has the default value of $FTLIB:$SYSLIB. When LIBRARY is used in the 
calling statement without a value, the keyed default value, MYLIB, is 
substituted. 

When the LOAD procedure is invoked, it expands to a single statement 
whose form depends on the choice of parameters: 

Invocation 

LOAD, NOGO. 

LOAD. 

LOAD , LIBRARY=THISLIB . 

LOAD , LIBRARY , NOGO . 
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Expansion 

LDR, NX , LIB=$FTLIB : $SYSLIB . 
LDR, ,LIB=$FTLIB:$SYSLIB. 
LDR,,LIB=THISLIB. 
LDR , NX , LIB=MYLIB . 



Example 2: 

The following in-line procedure definition creates a procedure called 
BLDABS. 

Definition 

PROC. 

BLDABS , SOURCE , LIST , G0= ' NO ' : ' YES ' , LIB= 

: ($SYSLIB:$FTLIB) ,MAP=FULL:PART. Prototype statement 
REWIND , DN=$BLD : &SOURCE . 
CAL , I=&SOURCE , L=&LIST , ABORT . 
LDR,NX,LIB=&LIB,MAP=&MAP,L=&LIST,AB=$ABD. 

REWIND, DN=$ABD:&LI ST. Definition body 

SAVE , DN=$ABD , PDN=MYPROGRAM . 
IFf&GO.EQ.'YES') 
$ABD. 
ENDIF. 
ENDPROC. 

Invocation 



BLDABS, WORK, ,G0,LIB=VLIB2. 

Expansion 

REWIND , DN=$BLD : WORK . 

CAL , I=WORK , L= , ABORT . 

LDR,NX,LIB=VLIB2,MAP=FULL,L= 

REWIND, DN=$ABD:. 

SAVE , DN=$ABD , PDN=MYPROGRAM . 

IF('YES*.EQ. *YES') 

$ABD. 

ENDIF. 



Example 3: 

This procedure exemplifies the proper use of the underscore character for 
the definition of a formal parameter. It creates a procedure called 
AUDJCL. 
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Definition 

PROC. 

AUDJCL,DN, LEVEL, L=$OUT:AUDLST. Prototype statement 

audit, PDN=&DN&LEVEL_JCL,ID=JCL,L=&L. Definition body 

ENDPROC. 

Invocation 

AUDJCL,-,05. 

Expansion 

AUDIT,PDN=-05JCL, ID=JCL,L=$OUT. 



Example 4: 

Parentheses are required when specifying multiple values for a single 
parameter value on a procedure definition prototype statement or on a 
calling statement. In these cases, the colon is used to separate default 
and Boolean values in a keyword parameter. For example: 

Procedure-definition prototype statement 

MYPR0C,P0S1,KEY=(DEF1:DEF2) : (B001:B002) . 

Invocation 

MYPROC, (P0S1A:P0S1B) . 

When substitution occurs during this call, P0S1A:P0S1B replaces all P0S1 
occurrences within the definition body. Both values (P0S1A and P0S1B) 
are evaluated separately during control statement evaluation. If 
apostrophes are on the call, 'POSlAtPOSlB' is evaluated as one literal 
string. 

Example 5: 

The following procedure definition exemplifies the use of literal strings 
instead of parenthetical strings. 

Definition 

PROC. 

PURGER,PDN,ID,ED,M. Prototype 

ACCESS , DN=$PURGE , PDN=&PDN , ID=& ID , ED=&ED ,M=&M, UQ , NA . 

DELETE, DN=$PURGE,NA. Definition body 

RELEASE , DN=$PURGE . 

ENDPROC. 
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Invocation 

PURGER, ' SOURCE. MAIN' , PROJECT. 

Expansion 

ACCESS , DN=$PURGE , PDN= ' SOURCE . MAIN ' , ID=PROJECT , ED= , M= , UQ , NA . 
DELETE , DN=$PURGE , NA . 

The apostrophes remain as part of the string in the expansion. If 
parentheses had been used in the invocation instead of apostrophes for 
the permanent dataset name, (SOURCE. MAIN) , the value when the ACCESS 
statement is evaluated would be SOURCE. MAIN because the outermost 
parentheses are removed when preceded by a valid separator. This action 
would cause an error because the period in SOURCE. MAIN would be evaluated 
as a statement terminator during evaluation. 

Example 6: 

The following example illustrates the use of parenthetical strings 
instead of literal strings in a procedure definition. 

Definition 

PROC. 

LGO,CALSORC,ABS,NLIB=$SCILIB: ($SCILIB: 

$SYSLIB:$FTLIB) . Prototype 

CAL,I=&CALSORC. 

ldr,nx,ab=&abs,nolib=&nlib. Definition body 

ENDPROC. 

Invocation 

LGO,,,NLIB. 

Expansion 

CAL,I=. 

LDR , NX , AB= , NOLIB=$SCILIB : $SYSLIB : $FTLIB . 

Parentheses were not included for the expansion of the NLIB keyed default 
value because parentheses are removed during processing when preceded by 
the concatenation delimiter ( : ) . 

If apostrophes had been used instead of parentheses for the NLIB 
parameter value, the colons would have been ignored as separators during 
expansion. Also, apostrophes are treated as part of the value when 
included in a procedure definition prototype statement or a calling 
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statement. Therefore, if apostrophes had been used, the following 
expansion would have occurred. 

CAL,I=. 

LDR, NX, AB= , NOLIB= • $SCILIB : $SYSLIB : $FTLIB ■ . 

When the LDR statement is executed, the value assigned to the NOLIB 
parameter is the literal string $SCILIB:$SYSLIB:$FTLIB which violates the 
syntax for the NOLIB parameter. 



Example 7: 

Consider the following procedure definition. This procedure is used to 
retrieve specified source decks from an UPDATE program library by the use 
of the &DATA option. 



PROC. 

GDECK , PLNAME , MASTERCH , DECKRNGE . 

ACCESS , DN=&PLNAME . 

UPDATE , I=QZRRZQ2 , Q , C=0 , S , P=&PLNAME . 

RELEASE , DN=QZRRZQ2 : &PLNAME . 

&DATA QZRRZQ2 

&MASTERCH_COMPILE &DECKRNGE 

ENDPROC. 



Prototype statement 
Definition body 



Two sample invocations and their expansions follow: 



Invocation 



GDECK,COSPL,*, (ST,CT) 



GDECK,FTLIBPL,*, (COS.RFD) 



Expansion 

ACCESS, DN=COSPL. 

UPDATE , I=QZRRZQ2 , Q , C=0 , S , P=COSPL . 

RELEASE , DN=QZRRZQ2 : COSPL . 

(Dataset QZRRZQ2 contains: 
♦COMPILE ST,CT) 

ACCESS , DN=FTLIBPL . 

UPDATE , I=QZRRZQ2 , Q , C=0 , S , P=FTLIBPL . 

RELEASE , DN=QZRRZQ2 : FTLIBPL . 

(Dataset QZRRZQ2 contains: 
♦COMPILE COS.RFD) 
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Example 8 : 

The example illustrates one mechanism for defining and maintaining user 
procedure libraries. Note the new procedure library is saved on mass 
storage for later use. 

ACCESS , DN=GENLIB . 
CALL,DN=GENLIB. 

The permanent dataset GENLIB contains: 

ECHO, OFF. 

RELEASE , DN=$PROC . 
* 

*. Define procedure for ACCESS of commonly used ID. 

• 

PROC. 

UQ , DN , ED= : 1 , PDN= : GENLIB , R= : READCW , W= : WRITECW , M= : MAINCW , NA= : NA . 

ACCESS , DN=&DN, ID=MYUID , PDN=&PDN, ED=&ED, R=&R,W=&W,M=&M, NA=&NA . 

RETURN. 

EXIT. 

RETURN, ABORT. 

ENDPROC. 
* 

*. Edit a local dataset. 
* 

• 

PROC. 

ED,DN,AC=: 'ACCESS' . 

IF ( ' &AC * .EQ. 'ACCESS ' ) 

UQ,&DN. 
ENDIF 

TEDI,DN=&DN. 
RETURN. 
EXIT. 
RETURN, ABORT. 

ENDPROC. 
* 

*. End of definitions 
* 



UQ,PROCLIB,NA. 

SAVE , DN=$PROC , PDN=PROCLIB , ID=MYUID . 

DELETE , DN=PROCLIB , NA . 

RELEASE , DN=$PROC . 

ACCESS , DN=PROCLIB , ID=MYUID . 

LIBRARY, DN=* : PROCLIB . 

ECHO, ON. 
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APPENDIX SECTION 



JOB USER AREA 



The table illustrations and their field descriptions are system generated. 



JOB TABLE AREA - JTA 

Each job has an area referred to as the Job Table Area (JTA) preceding 
the field defined for the user. A JTA is accessible to the operating 
system but not to the user. The format of a JTA is described in the COS 
Table Descriptions Internal Reference Manual, CRI publication SM-0045. 
The Job Table Area contains job-related information such as accounting 
data; a JXT pointer; sense switches; one or more task control blocks 
(TCBs) , each of which contains an exchange package area and an area for 
saving B, T, and V register contents; control statement and logfile DSPs; 
and buffers; a copy of the user's LFTs; and a Dataset Name Table (DNT) 
for each dataset used by the job. 



JOB COMMUNICATION BLOCK - JCB 

Following the JTA is a 128-word block referred to as the Job 
Communication Block (JCB) . The user accessible JCB contains a copy of 
the current control statement for the job and other job-related 
information. 

Figure A-l illustrates the JCB. 

0. ...+.... 1....+.... 2.... +....3.... +....4.... +....5.... +....6... 




100 



Figure A-l. Job Communication Block (JCB) 
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0. 



+ + — ++_+-+. 

101 I LPP I//II/IUI 
+ + — ++_+-+. 



HLM 



NPF 



BFB 
MFL 



FL 



DSP 



102 I 

+ 

103 I NLE | MFL | LFT 
++++++++++++++++++ + + + + 

104 I | | | | | | | | | | | | | | | | | ULFT | | PNST I STEM I 
++++++++++++++++++ + + + +++ +-+++++-+ + 

105 HUM CYCL | CPTP |MCP INLCPIII IAC I I I I I///////// 1 
++++++ + + + +++ +++++ + 

106 I CRL I 



107 I 
+ 

110 | 
+■ 

111 I 
+ 

112 | 
+■ 

113 I 
+- 

114 I 



NULE 



ACN 



PWD 



PROM 
+— 



PLEV 



ILEV 



+ + 

I /////// I 



+ + 

I /////// I 



CLEV 



115 I 
+- 

116 I 



MMIN 
MMBA 



MMIS 
MMEP 



•++- 



117 I STIN | | STIS | 

+ ++ + 

120 J /////////////////////////////// 1 AVBA | 

+ + + 

121 | TSF I 

+ + + 

122 I PSM | /////////////////////////////// I 

+ + + 

123 I DMM I 

+ + 

124 I /////////////////////////////////////////////////////////////// 1 
+ + 

125 | /////////////////////////////////////////////////////////////// I 

+ + + 

126 I NUDP I /////////////////////////////////////////////// I 

+ + + + 

127 I /////////////////////////////// 1 TPTR | 

+ + + 

Figure A-l. Job Communication Block (JCB) (continued) 
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RDYQ 
RUNQ 

/////////////////////////////////////////////////////////////// 
/////////////////////////////////////////////////////////////// 
/////////////////////////////////////////////////////////////// 



130 
131 
132 

145 
146 

163 
164 
165 
166 
167 
170 

177 

+ — + 

200 1 /////////////////////////////////////////////////////////////// 1 

+ + 

Figure A-l. Job Communication Block (JCB) (continued) 



LDR 



STN 
STF 



BDAT 

BTIM 

DIG 



Field Word(base8) Bits Description 



JCCCI 



0-5 



5-17 0-63 



JCCPR 20-77 0-63 



The first five words of the JCB are 
assigned as a save area for the BGN 
table that is used by F$BGN. 

Control statement image packed 8 
characters per word 

Control statement parameters, 
expanded to two words per parameter 
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Field Word(base8) Bits Description 

JCJN 100 0-55 Job name; bits 56-63 must be 0. 

JCLPP 101 0-7 Lines per page 

JCRMSG 101 11 RFL message sent 

JCU 101 14-15 User mode indicator: 
JCUL 101 14 Local 
JCUG 101 15 Global 

JCHLM 101 16-39 High limit of user code 

JCFL 101 40-63 Current field length 

JCNPF 102 0-15 Number of physical buffers and 

datasets 

JCBFB 102 16-39 Base address of I/O buffers 

JCDSP 102 40-63 Base address of DSP area 

JCNLE 103 0-15 Number of entries in LFT 

JCMFL 103 16-39 Maximum FL allowed 

JCLFT 103 40-63 Base of LFT 

JCDCS 104 CSP dynamic control statement flag 

JCCSDB 104 1 CSP debug flag 

JCBP 104 2 JOB statement breakpoint (BP) flag 

JCNTB 104 3 CSP traceback suppression flag 

JCIOAC 104 4 I/O area current status flag: 

User's I/O area is unlocked 

1 User's I/O area is locked 

JCIOAP 104 5 I/O area previous status flag: 

User's I/O area is unlocked 

1 User's I/O area is locked 

JCIA 104 6 Interactive flag 

JCCHG 104 7 Execute CHARGES utility for trailer 

message . 
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Field Word(base8) Bits Description 



JCJBS 



JCCSIM 



JCDLIT 



JCEFI 



104 



104 



104 



8 



105 



10 



JCRPRN 


104 




ll 


JCVSEP 


104 




12 


JCSDM 


104 




13 


JCPDMS 


104 




14 


JCCSQ 


104 




15 


JCOVT 


104 




16 


JCULFT 


104 


17- 


-47 


JCPNST 


104 


48- 


-55 


JCSTRM 


104 


se- 


-63 



JCOVL 


105 


1 


JCSBC 


105 


2 


JCBDM 


105 


3 


JCORI 


105 


4 


JCCYCL 


105 


5-20 


JCCPTP 


105 


21-29 


JCMCP 


105 


30-34 



JOB statement flag (if set, JOB 
statement just processed) 

Flag is set when CRAY-1 simulator is 
running. 

Display literal delimiters in 
control statement crack. 

Retain level 1 parentheses. 

Last character was valid separator. 

NOECHO of current control statement 

Suppress PDM user logf ile messages 

New CFT calling sequence in effect 

Overlay type 

Base of user LFTs (JCB-REL) 

Parentheses nesting level for 
current control statement 

Statement termination for current 
control statement 

Enable floating-point interrupt 
flag; used by $ARLIB math routines 
to reset floating-point interrupt 
flag 

Overlay flag 

SBCA flag 

Enable bidirectional mode flag 

Interrupt on operand range flag 

CPU cycle time, in picoseconds 

CPU type, QCRAYxxx 

Maximum number of logical CPUs that 
can be assigned to a user job 
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Field Word(base8) Bits Description 



JCNLCP 105 
JCEMA 105 
JCAVL 105 



JCIAC 



105 



JCACRQ 105 

JCPWRQ 105 

JCRYPT 105 

JCSLVL 105 

JCCRL 106 

JCCRLS 106 

JCACN 107-110 

JCACN1 107 



JCACN2 



110 



JCPWD 111-112 

JCPWD1 111 

JCPWD 2 112 

JCPROM 113 



35-39 
40 
41 

42-49 

50 

51 

52 

53 

0-63 

32-63 

0-63 

0-63 

0-55 

0-63 
0-63 
0-55 
0-63 



JCNULE 


114 


0-15 


JCPLEV 


114 


16-31 


JCILEV 


114 


32-47 


JCCLEV 


114 


48-63 



Current number of logical CPUs asg'd 

l=Extended memory addressing enabled 

l=Additional vector logical unit enab. 

Number of account processing retries 
allowed for an interactive job 

Accounting mandatory flag 

Password mandatory flag 

Encryption flag 

Security level flag 

COS revision level 

COS revision number 

1 through 15 character account number 

Characters 1 through 8 of account 
number 

Characters 9 through 15 of account 
number 

1 through 15 character password 

Characters 1 through 8 of password 

Characters 9 through 15 of password 

Current user job interactive prompt, 
justified, zero-filled. 64 bits of 
binary zeroes disables user job 
prompt. Set to system default at 
beginning of each job step. 

Number of user LPT entries (below HLM) 

Current procedure nesting level 

Current iterative nesting level 

Current conditional nesting level 



SR-0011 



A-6 



M 



Field Word(base8) Bits Description 



The next four words are 
JCMMIN 115 0-31 
JCMMIS 115 32-63 
JCMMBA 116 0-31 
JCMMEP 116 32-63 



JCSTIN 


117 


0-30 


JCSTRT 


117 


31 


JCSTIS 


117 


32-63 


JCAVBA 


120 


32-63 


JCTSF 


121 


0-63 


JCPSM 


122 


0-31 


JCDMM 


123 


0-63 


JCNUDP 


126 


0-15 


JCTPTR 


127 


32-63 


JCRDYQ 


130 


0-63 


JCRUNQ 


131 


0-63 


JCLDR 


146-163 


0-63 


JCSTN 


164 


0-63 


JCSTF 


165 


0-63 


JCBDAT 


166 


0-63 


JCBTIM 


167 


0-63 



JCDIG 170-177 



used by the run-time memory manager : 

Size of increments to the managed memo 

Initial size of memory to be managed 

Base address of managed space 

Size of smallest block added to 
available space list 

Size of increments to a stack 

Flag to indicate stack for root task 

Initial size of a stack 

Base of available space 

Task scheduling flag 

Pseudo semaphore registers 1 A&B, 1/S 

Don't move memory when nonzero 

Number of system DSPs in user 

Pointer to list of all tasks 

Multitasking ready queue header 

Multitasking run queue header 

Unsatisfied externals 

Job step count 

Job step failure flag 

Date of absolute load module 
generation 

Time of absolute load module 
generation 

0-63 Reserved for diagnostics 
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LOGICAL FILE TABLE - LFT 

The Logical Pile Table contains a 2-word entry for each dataset name and 
each alias for a dataset. Each entry points to the DSP for a dataset. 
Figure A-2 illustrates an LFT for a dataset. 

0....+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + 

I DN I /////// I 

+ + + + + 

1 I OST | /////////////////////////////////// | DSP | 

+ + + + 

Figure A-2. Logical File Table (LFT) entry 



Field Word(base8) Bits Description 

LFDN 0-55 Dataset name 

LFOST 1 0-3 DATASET OPEN STATUS 

LFDSP 1 40-63 DSP address 
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DATASET PARAMETER AREA - DSP 

Information concerning the status of a particular dataset and location of 
the I/O buffer for the dataset is maintained in the Dataset Parameter 
Area (DSP) of the user field. The DSP is illustrated in figure A-3. 



+ + + 

I DN I /////// I 

++ ++-+ +++ ++-+++++++ + + 

111 ERR ||*| BFI I I IOSTI 1*1 I I I I I I FRST | 

++ + — ++-+ +++ ++_+++++++ + 

2 I///////// IBP IBN IN | 
++-+ + + + + 

3 I |/| RBC | OBP I OBN | OUT | 
++-+ + + + + 

4||| BS | TBN | LMT | 

++++++ + + + + 

5 | | | | | | PFI | PRI | RCW | 
++++++ + + + 

6 111 LPW I 
+++ + + + + 

7 | | | BF | BUBC I BWC | BWA | 
+++ + + 4 + 

10 I TM I 



17 I I 

+ + + + 

20 I TPS I /////////////////////// I TPV | 
+-+-+ + + + + + 

21 |*|*| TAPE | I /////////////////////////// 1 MTF | 
+++-++ + + + + + + 

22 | |FD | RF |///| MBS | RS | 
++ ++-+ +-+++ + • + 

23 IBFBO |*|///|*||| BFBL | BFBA | 
+ +++ +-+++ + + 

24 ILPBL I I I/////// 1 SBL I BLBL | 
+ +++ + + + 

25 | LOCK I 
+ — + + 

26 I EEC I /////////////////////////////////////////////////// I 

+ +++++ + + 

27 I ///////////Mill RECL | NXRC | 

+ +++++ + + 

Figure A-3. Dataset Parameter Area 
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Field Word(base8) Bits Description 



DPDN 
DPBSY 



DPERR 
DPEOI 



DPENX 
DPEOP 
DPEPD 
DPEBN 
DPEDE 
DPEHE 
DPERW 



DPEPT 
DPELE 



DPEEP 
DPSTS 



DPBFI 



0-55 




1-12 

1 



9 
10 



12 
14-15 



16-24 



DPQIO 


1 


26 


DPOST 


1 


27-30 


DPABD 


1 


31 


DPTP 


1 


32-33 


DPTRAN 


1 


34 


DPIA 


1 


35 


DPMEM 


1 


36 



Dataset name 

Busy flag, circular I/O: 

Not busy 

1 Busy 

Error flags: 

End of data on read; write past 
allocated disk space on write. 

Dataset does not exist 
Dataset not open 
Invalid processing direction 
Block number error 
Unrecovered data error 
Unrecovered hardware error 
Attempted read after write or 
past EOD 

Dataset prematurely terminated 
Unrecovered logical data error 
Reserved 

Extended error (see DPEEC) 

Status: 

00 Closed 

01 Open for output (O) 

10 Open for input (I) 

11 Open for I/O 

Blank compression character in ASCII 
(BFI=0*777 implies no compression) 

Queued I/O Request Flag 

Open status 

Accept bad data flag 

Tape dataset (online/staged) 

Transparent mode for interactive 
dataset 

Dataset is interactive 
Dataset is memory resident 
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Field Word(base8) Bits Description 



DPRDM 



DPUDS 



DPOBN 



37 



38 



DPEND 


1 


39 


DPFRST 


1 


40-63 


DPIBP 


2 


10-15 


DPIBN 


2 


16-39 



DPIN 


2 


40-63 


DPSPOS 


3 





DPRBC 


3 


3-9 


DPOBP 


3 


10-15 



16-39 



DPOUT 3 40-63 
DPUEOF 4 
DPBS 4 1-15 



Random dataset flag: 

Sequential dataset 

1 Random dataset 

Undefined dataset structure: 

COS-blocked dataset structure 

1 Undefined dataset structure 

Write end-of-data flag 

Address of first word of buffer 

Input bit position 

Block number, read request. System 

reads from block number until buffer 
is filled. DPIBN is then set to the 
next block number. 

Address of current input word 

Asynchronous SETPOS busy flag 

Remaining blank count 

Bit position in current output word 
(character I/O only) 

Block number, write request. System 
writes from block number until 
buffer is empty. The next block 
number is then in DPOBN. 

Address of current output word 

Uncleared end-of-file (EOF) 

Buffer size (in D*512 word sectors) 



DPTBN 

DPLMT 

DPEOR 
DPEOF 



16-39 Temporary block number; used by 
random I/O for last block read 

40-63 Address of last word+1 of buffer. 

LMT minus FRST defines buffer size. 

EOR flag 

2 EOF flag 
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Field Word(base8) Bits Description 



DPEOD 5 
DPRW 5 



3 EOD flag 

4 Previous operation read/write flag: 

Read 

1 Write 



DPPPI 



DPPRI 



DPRCW 



DPLPW 



DPBIO 



DPBER 
DPBF 



5 5-24 Previous file index; backward index 
to block containing previous EOF. 

5 25-39 Previous record index; backward 

index to block containing previous 
EOR. 

5 40-63 Control word address: 

Previous RCW address if in write 

mode 

Next RCW if in read mode 

6 0-63 Last partial word; used for 

character mode I/O 

7 Buffered I/O busy: 

Buffered I/O operation complete 

1 Buffered I/O operation 
incomplete 

7 1 Buffered I/O error flag 

7 2-9 Function code: 

BIOFRRP = Read partial record 

BIOFRR = O'lO Read record 

BIOFWRP = O'40 Write partial record 

BIOFWR = O'50 Write record 

BIOFEOF = 0'52 Write EOF 

BIOFEOD = ! 56 Write EOF 



DPBPD 



DPBEO 



DPBUBC 



6-9 



7 10-15 



Processing direction: 

Read 

1 Write 

Termination condition: 

00 Partial 

10 Record 

12 File, write only 

16 Dataset, write only 

Unused bit count; must be specified 
on a write record request. Value 
returned on a read request. 
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Field Word(base8) Bits Description 



DPBWC 



16-39 Word count; number of words at DPBWA 
to read or write. Field contains 
actual number of words read when 
request is completed. 



DPBWA 



40-63 Word address of user data area 
L@DPTM=D • 8 



DPTM 



10-17 



0-63 



Wd 


Bits 


8 


0-63 


9 


0-63 


10 


16-39 


10 


40-63 


11 


16-39 


11 


40-63 


12 


0-7 



12 8-15 



12 


16-39 


12 


40-63 


13 


16-39 


13 


40-63 



14 0-15 

14 16-39 

14 40-63 

15 0-63 



Use 

Saved word W@DPPRI 
Saved A2 in WB30 
$RWDP/$WWDP return 
address 

$RWDP/$WEOF first word 
address (FWA) 
WB30/$WEOF return 
address 

$WEOD return address 
JTA length/1000 octal 
when registers are saved 
Bits 0-7 of RBLK/WBLK 
A5 

(B.ZE) 

RBLK/WBLK B0 
DNT address 
(A7) JXT address 
recall 

Bits 8-23 of RBLK/WBLK 
A5 

RBLK/WBLK A2 
RBLK/WBLK A3 
RBLK/WBLK S6 



DPTPS 


20 


DPTPV 


20 


DPTPD 


21 


DPTPF 


21 



0-15 Online tape status 

40-63 Tape pointer to label definition 
table 

0-1 Tape density 

2-3 Tape format 
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Field Wor< 


3(base8) 


Bits 


Description 


DPTAPE 


21 


4-19 


Tape status 


DPAEV 


21 


4 


User is at tape end of volume 


DPTOR 


21 


5 


Tape off reel 


DPTMS 


21 


6 


Tape mark status 


DPBLT 


21 


7 


Blank tape 


DPEOVR 


21 


8 


EOV READ 



MASKS FOR TESTING TAPE STATUS FIELD 



TS$E0V=O' 100000 EOV mask 
TS$TOR=O l 040000 Tape off reel 

mask 
TS$TMS=O , 020000 Tape mark status 

mask 
TS$BLT=0' 010000 Blank tape 

detected mask 
TS$EOVR=0* 004000 Read completed 

in EOV processing 



DPMTF 
DPCV 



21 48-63 Maintenance test field 

22 Data conversion flag 

DPCVOFF=0 Data conversion off 
DPCVON=l Data conversion on 



DPFD 



22 1-4 Translation identifier 

DPFDNONE=0 NO foreign file 

translation 

DPFDIBM=1 IBM file translation 

DPFDCDC=2 CDC file translation 



DPRF 



22 5-11 Record format (if DPCT nonzero) 

DPRFUNKN=0'177 Unknown record 



DPRFIU=0 

DPRFIF^l 

DPRFIFB=2 

DPRFIV=3 

DPRFIVB=4 

DPRFIVBS=5 



format 

IBM undefined 

IBM fixed 

IBM fixed blocked 

IBM variable 

IBM variable 

blocked 

IBM variable block 

span 
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Field Word(base8) Bits Description 



Values 21 through 37 are reserved for ANSI record types: 

DPRFHW=O'00 I tape format, I 

blocks, W records 
DPRFICWO'10 I tape format, C 

blocks, W records 
DPRFICZ=0'11 I tape format, C 

blocks, Z records 
DPRFICS=0 , 12 I tape format, C 

blocks, S records 
DPRFSIIW=O'40 SI tape format, I 

blocks, W records 
DPRFSICW=O'50 SI tape format, C 

blocks, W records 
DPRFSICZ=0'51 SI tape format, C 

blocks, Z records 
DPRFSICS=0'52 SI tape format, C 

blocks, S records 

Maximum block size 

Record length 

User data area current bit offset 

Character set (if DPCT nonzero) 
DPCSAS=0 ASCII 
DPCSEB=1 EBCDIC 
DPCSDC=2 CONTROL DATA display code 

Record continuation code 

Bad data flag 

Process-characters-remaining flag 

User data area current bit length 

User data area current address 

Last partial word bit length 

Foreign dataset end of logical record 

Foreign dataset end of logical file 

Current segment/record bit length 

Current tape block bit length 



DPMBS 


22 


16-39 


DPRS 


22 


40-63 


DPBFBO 


23 


0-5 


DPCS 


23 


6-7 



DPSCC 


23 


12-13 


DPBDF 


23 


14 


DPPCR 


23 


15 


DPBFBL 


23 


16-39 


DPBFBA 


23 


40-63 


DPLPBL 


24 


0-5 


DPEOLR 


24 


6 


DPEOLF 


24 


7 


DPSBL 


24 


16-39 


DPBLBL 


24 


40-63 
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Field 



DPLOCK 



DPEEC 



DPDEL 



DPBLNK 



Word(base8) Bits Description 
25 0-63 



DPDIR 


27 


14 


DPUFMT 


27 


15 


DPRECL 


27 


16-39 


DPNXRC 


27 


40-63 



Multitasking lock (nonzero TIB address 
if log is set) 



26 0-11 Error code if DPEEP is set; 

correspond to EXP abort codes. 

27 12 FORTRAN file status: 

Keep 

1 Delete 

27 13 FORTRAN numeric input blank 
conversion: 

Null 

1 Zero 



FORTRAN direct access flag 

FORTRAN unformatted I/O flag 

FORTRAN direct access record length 
(in number of characters) 

FORTRAN direct access next record 
number 



When the FD field in word 22 of the Dataset Parameter Area is equal to 
CDC, it is redefined as shown in figure A-4. 



0, 



22 | //// | F | * | RT | /////////////////////////////////////////////////// I 
+ +-+-+ — + + 

Figure A-4. CDC record format 



Field Word(base8) Bits Description 



DPF 



DPBT 



22 5-6 Tape format 

DPFI=0 internal 

DPFSI=1 System or scope internal 

22 7-8 Block type 

DPBTI=0 Internal 

DPBTC=1 Character count 
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Field Word(base8) Bits Description 

DPRT 22 9-11 Record type 

DPRTW=0 Control word 

DPRTZ=1 Zero byte 

DPRTS=2 System-logical 



Figure A-5 shows the redefinition of the LPW field in word 6 of the 
Dataset Parameter Area used by asynchronous SETPOS as save areas. 

0....+....1....+....2.. ,.+....3....+....4....+....5....+....6... 

+ + 

I /////////////////////////////////////////////////////////////// 1 
I I 

I /////////////////////////////////////////////////////////////// 1 
I I 

5 I /////////////////////////////////////////////////////////////// I 
+ + + + 

6 I ///////////////////// I SPWA | SPIN I 

+ + + + 

Figure A-5. Save areas used by asynchronous SETPOS 



Field Word(base8) Bits Description 

DPSPWA 6 22-30 Word address save areas used 

DPSPIN 6 31-63 by asynchronous SETPOS 
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PERMANENT DATASET DEFINITION TABLE - PDD 

The PDD is a parameter list that gives input to the Permanent Dataset 
Manager. The PDD illustrated in figure A-6 is used for all save, access, 
dump access, load, modify, permit, rewrite SDT, pseudo-access, and 
permanent dataset name requests. The PDD illustrated in figure A-7 is 
used for both DSC and DXT page requests, and for dump time requests. The 
PDD illustrated in figure A-8 is used for all delete, release, and adjust 
requests. The PDD illustrated in figure A-9 is used for queue and 
dequeue SDT requests, and for get and link DXT requests. Table A-l 
presents a list of Permanent Dataset function codes. 



Table A-l. 


Permanent dataset function codes 




Octal 




Symbol 


Code 


Function 


PMFCSU 


10 


Save user dataset 


PMFCSI 


12 


Save input dataset 


PMFCSO 


14 


Save output dataset 


PMFCAU 


20 


Access user dataset 


PMFCAI 


26 


Access spooled dataset 


PMFCAO 


26 


Access spooled dataset 


PMFCDU 


30 


Delete user dataset 


PMFCDI 


36 


Delete spooled dataset 


PMFCDO 


36 


Delete spooled dataset 


PMFCPG 


40 


DSC Page request 


PMFCPX 


41 


DXT Page request 


PMFCLU 


50 


Load user dataset 


PMFCLI 


52 


Load input dataset 


PMFCLO 


54 


Load output dataset 


PMFCRL 


60 


PDS/Release request 


PMFCPN 


70 


PDN request 


PMFCDT 


100 


Dump time request 


PMFCDQ 


110 


Dequeue SDT 


PMFCEA 


120 


Queue SDT to available queue 


PMFCEI 


122 


Queue SDT to input queue 


PMFCEO 


124 


Queue SDT to output queue 


PMFCAD 


130 


Adjust user dataset 


PMFCMD 


140 


Modify user dataset 


PMFCRSDT 


150 


Rewrite input SDT entry 


PMFCPSAC 


160 


Pseudo-access for RRJ 


PMFCPU 


170 


Access user saved dataset for PDSDUMP 


PMFCPO 


176 


Access output dataset for PDSDUMP 


PMFCPI 


176 


Access input dataset for PDSDUMP 


PMFCPE 


200 


Permit Request 


PMFCLKDX 


210 


Link DXT Request 


PMFCRTDX 


220 


Get DXT Request 
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0, 



,4 



++++++-+-+-++++ + + 

llllll*!*l*llll/////////////////l SIZE | ST 
++++++-+-+-++++ + + 



5 +, 

— + 



13 I 

++++ ++++++- 

14 Nil TXL IMIII 
++++ ++++++- 

15 I 



I FC | 
.+ + + 



1 1 










DN 












I///////I 


2 I 












PDN 










1 


+ 
3 I 






















+ + 

I///////I 


4 I 












ID 










1 


5 I 

+ 












USR 










1 
+ + 


6 1 






















I///////I 


7 I 




TXT 




1 




FM 


1 


RT 




1 


ED | 


10 1 










OJB 












I///////I 


11 1 


SID 




1 


DID 




1 


DC 




1 




JSQ 1 


12 I 
+ 












TID 










1 

+ 



SF 



MFL 



TL 



RD 



PR 



16 | 
+- 

17 I 
+- 

20 I 



WT 
MN 



JCN 
CL 



I /////// I 
-+ + 

I /////// I 



21 



++- 



22 || JSP | JCR | OLM |RJST || IJSP I 
+++ — +-+-+ ++ + + + ++ + 

23 l*l**l*l///////|| TPB | TPV | 
+++-++++-+ ++ + + 

24 ||**|||**| ////////////////////////////////////////////////////// | 
++ — +++ — + + 

25 I I ////////////////////////////////////////////////////////////// 1 

++ + 

26 I I ////////////////////////////////////////////////////////////// 1 

+++ + + 

Figure A-6. Permanent Dataset Definition Table (PDD) 
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0. ...+.... 1....+.... 2.... +....3.... +....4.... +....5.... +....6... 

+++ + + 

+++ + + + + + 

30 II//////I LSD |///| FPE | 
++ + + + + + + 

31 | ACS | DSZ | OJSQ I 

+ + + + 

32 | CRT I 

+ + 

33 I ACT I 

+ + 

34 | TDM I 

+ + 

35 | MOD | 
+ + + + + 

36 I SSC | TXC | MML I /////////////////////////////////// I 
+++-+ + + + + + 

37 Ill*|///| PAM | ADNM I /////////////////////////////// 1 
+++-+ + + + + + 

40 I ADN I///////I 
+ + + + + 

41 | NOTL | NOTE I /////////////////////////////// I 

+ + + + 

42 | CHG I 

+ + 

43 I OWN | 
+ + + 

44 I I /////// I 

+ + + 

45 I DNS | 

+ + 

46 I ACN | 
+ + + 

47 I I///////I 

+ + + 

Figure A-6. Permanent Dataset Definition Table (PDD) (continued) 

Field Word(base8) Bits Description 

PMSG Normal completion message 

suppression indicator 

PMERR 1 Error message suppression indicator 

PMWAIT 2 WAIT flag for a disposed dataset 
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Field Word(base8) Bits Description 



PMNRLS 

PMAQR 

PMTP 

PMTCS 

PMEXO 

PMDTR 

PMSMT 

PMDFFL 

PMSIZE 

PMST 

PMFC 

PMDN 

PMPDN 

PMPDN1 

PMPDN2 

PMID 

PMUSR 

PMUSR1 

PMUSR2 

PMTXT 

PMFM 














1 

2-3 
2 
3 
4 

5-6 
5 
6 
7 
7 



PMRT 7 

PMED 7 



3 No release of dataset on DISPOSE 

4 Acquire flag for accounting 
5-6 Tape dataset (online/staged) 
7-8 Tape dataset character set 

9-10 Execute only 

11 Update dump-time on PDSDUMP access 

12 Submit flag 

13 Job-used-MFL-de fault flag 
32-39 PDD size in words 

40-51 Return status 

52-63 Function code (see chart PM-1) 

0-55 Local dataset name 

0-63 Permanent dataset name 

0-63 Characters 1-8 

0-55 Characters 9-15 

0-63 User identification 

0-63 User number 

0-63 Characters 1-8 

0-55 Characters 9-15 

0-23 Address of optional text field 

24-39 Format designator (two characters) : 
FMCD=CD Character/deblocked 
FMCB=CB Character/blocked 
FMBD=BD Binary/deblocked 
FMBB=BB Binary/blocked 

40-51 Retention period; 0-4095 days. 

52-63 Edition number (0-4095) 
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Field Word(base8) Bits Description 



PMOJB 10 
PMSID 11 
PMDID 11 



PMDC 



11 



0-55 

0-15 

16-31 

32-47 



PMJSQ 


11 


48-63 


PMTID 


12 


0-63 


PMSF 


13 


0-63 


PMUQ 


14 





PMENT 


14 


1 


PMIR 


14 


2 


PMTXL 


14 


3-10 



Originating job name 

Source ID; 2 characters. 

Destination ID; 2 characters. 

Disposition code; 2 characters. 

DCIN=IN Job dataset 

DCST=ST Dataset to be staged 

DCSC=SC Scratch dataset 

DCPR=PR Print dataset 

DCPU=PU Punch dataset 

DCPT=PT Plot dataset 

DCMT=MT Magnetic tape dataset 

Job sequence number 

Terminal ID; 1-8 characters. 

Special forms 

Unique ACCESS/Write ring requested 

Enter in System Directory 

Immediate reply requested 

Number of words of text 



PMNRR 



PMINIT 


14 


PMIA 


14 


PMDFR 


14 


PMNA 


14 



PMMFL 


14 


PMSGFL 


14 


PMFL 


14 



PMTL 



14 11 Job rerun flag; set if job cannot be 
rerun (input entries only) . 

12 Job initiate flag; set if job has 
been initiated. 

13 Interactive flag 

14 Deferred disposition indicator 

15 No abort flag. If set, processing 
continues even if an error is 
encountered . 

16-31 MFL parameter from job card (input) 

16 All available memory requested 
17-31 Field length/512 

14 32-55 Time limit (input datasets) 
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Field Word(base8) Bits Description 

PMPR 14 56-63 Priority (input datasets) 

PMRD 15 0-63 Read permission control word 

PMWT 16 0-63 Write permission control word 

PMMN 17 0-63 Maintenance permission control word 

PMJCN 20 0-55 Job class name 

PMCL 21 0-55 CL parameter from JOB statement 

PMSYS 22 System job 

PMJSP 22 1-8 JOB statement priority 

PMJCR 22 9-24 Job class rank 

PMOLM 22 25-48 Size of $OUT in 512-word block 

PMRJST 22 49-54 Job status flag 

PMIJSP 22 56-63 Original job card priority 

PMTPD 23 0-1 Tape density 

PMTPL 23 2-4 Tape label type 

PMTPF 23 5-6 Tape format 

PMTPC 23 15 Tape cataloged dataset 

PMTPB 23 16-39 Tape maximum block size in bytes 

PMTPV 23 40-63 Tape pointer to label definition 

table 

PMTPM 24 Tape online maintenance access 

PMTPP 24 1-3 Tape parallel device count 

PMTP2 24 4 Tape second device assignment 

PMTPH 24 5 Tape hold assigned device 

PMIDC 24 6-8 Tape initial disposition code 

PM2164 25 Unused 

PM2264 26 Unused 
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Field Word(base8) Bits Description 



PMTSCV 



PMTXO 


27 


48-63 


PMOCC 


30 





PMLSD 


30 


8-31 


PMFPE 


30 


36-63 


PMFPP 


30 


36-59 


PMFEN 


30 


60-63 



PMACS 



PMDSZ 



PMOJSQ 



27 0-1 Timestamp conversion specification 

TSCVTHIS=0 Convert to current COS 
system 

TSCVRT=1 Convert to RT-based 
timestamp 

TSCVNS=2 Convert to NS-based 
timestamp 

TSCVSAME=3 No conversion — leave 
timestamp alone 

TXT ORDINAL OF USER TASK 

Operator-changed-class flag 

Temporary SDT address for load 
input/output 

First DSC page/entry for dataset 
First DSC page for dataset 
First entry for dataset 

Number of accesses (load saved 
datasets only) 

Size of dataset as reflected by DSC 

DAT bodies (used only when a pseudo 

access is performed during the 
recovery of rolled jobs) 

31 48-63 Originating job sequence number 



31 



31 



0-15 



16-47 



PMACT 



PMTDM 



PMMOD 



request only) 

33 0-63 Time of last access in cycles (load 

request only) 

34 0-63 Time of last dump in cycles (load 

request only) 

35 0-63 Time of last modification in cycles 

(load request only) 



PMSSC 



36 



0-7 Station slot word length 
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Field Word (base 8) Bits Description 



PMTXC 36 8-15 

PMMML 36 16-27 

PMPDE 37 

PMREM 37 1 

PMTRA 37 2-3 



PMPAM 



PMADNM 



37 



37 



PMADN 40 

PMNOTL 41 

PMNOTE 41 

PMCHG 42 

PMOWN 43-44 



0-55 

0-7 

8-31 

0-63 
0-63 



Text field word length 

Interactive maximum message length 

Partial delete flag 

Remove permit flag 

Track accesses flag: 

TRAKNO=l Do not track accesses 
TRAKYE=2 Do track accesses 



8-15 Public/permit access mode: 

PAMEXO'Oll Execute only 



PAMRE=O»001 
PAMWR=O'002 
PAMMA=O'004 
PAMNO=0'200 
MAXPAM=5 



Read permission 
Write permission 
Maintanence permission 
No permissions 



16-31 ADN propagate attributes mask: 



PACW=0' 000001 
PAPAM^O 1 000002 
PATRK=0' 000004 
PAPERK)' 000010 
PATXT=0' 000020 
PANTS=0' 000040 
PAAJJX) 1 000077 
PANO=0' 100000 
MAXPA=D ' 8 



Control words 

Public access mode 

Track accesses 

Permits 

Text 

Notes 

All of the above 

None 

Maximum allowable 

attributes 



Attributes dataset name 

Notes length in words 

Pointer to notes text 

LE@NOTE=D , 60 Allow 480 characters 
for notes 

Last modification time (PDSLOAD) 

Dataset Owner 
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Field Word (base 8) Bits Description 

PM0WN1 43 0-63 Owner (char 1-8) 

0-55 Owner (char 9-15) 

0-63 Reserved for installation 

0-63 Account Number 

0-63 Characters 1-8 of account number 

0-55 Characters 9-15 of account number 



PMOWN2 


44 


PMDNS 


45 


PMACN 


46-47 


PMACN1 


46 


PMACN2 


47 



0. ...+.... 1... •+.... 2.... +....3.... +....4.... +....5.... +....6... 

+++ + + + + 

III/////////////////////////////! SIZE | ST | FC | 
+++ + + + + + 

1 I DN I /////// I 

+ + + + + 

2 I /////////////////////////////// I NPG I BPG I 

+ + + + + + + 

3 I /////// I NHP | NOP | BUF | 
+ + + + + 

Figure A-7. Permanent Dataset Definition Table (PDD) format 2 

Field Word (base 8) Bits Description 

PMSG Normal completion message 

suppression indicator 

PMERR 1 Error message suppression indicator 

PMSIZE 32-39 PDD size in words 

PMST 40-51 Return status 

PMFC 52-63 Function code (see chart PM-1) 

PMDN 1 0-55 Local Dataset Name (PMFCDT) 

PMNPG 2 32-47 Number of pages (PMFCPG,PMFCPX) 

PMBPG 2 48-63 Beginning page number (PMFCPG f PMFCPX) 

PMNHP 3 8-23 Number of hash pages (returned by 

PDM for PMFCPG requests) 
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Field Word (base8) Bits Description 

PMNOP 3 24-39 Number of overflow pages (returned 

by PDM for PMFCPG requests) 

PMBUF 3 40-63 Buffer address 

0. ... + .... 1.... + .... 2.... + ....3....+ 4....+ 5 + 6... 

+++ + + + + 

III/////////////////////////////! SIZE | ST | FC | 

1 I DN I /////// I 

+ + + 

Figure A-8. Permanent Dataset Definition Table (PDD) format 3 

Field Word(base8) Bits Description 

PMSG Normal completion message 

suppression indicator 

PMERR 1 Error message suppression indicator 

PMSIZE 32-39 PDD size in words 

PMST 40-51 Return status 

PMFC 52-63 Function code (see chart PM-1) 

PMDN 1 0-55 Local dataset name 



0....+....1....+....2....+....3....+....4....+....5....+....6... 

+++ + + + + 

III/////////////////////////////! SIZE | ST I FC | 

1 I /////////// I DSPE | DXT | 

+■ + + + 

2 | PDN I 
+ + + 

3 I I /////// I 

+ + + + + 

4 I /////////////////////// I SDT I SQJ | 

+ + + + 

Figure A-9. Permanent Dataset Definition Table (PDD) format 4 
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Field Word(base8) Bits Description 



PMSG 



PMERR 





1 


PMSIZE 





32-39 


PMST 





40-51 


PMPC 





52-63 


PMDSPE 


1 


12-39 



PMDSP 



PMDSE 



PMDXT 



PMPDN 


2- 


-3 


0-63 


PMPDN1 




2 


0-63 


PMPDN2 




3 


0-55 


PMSDT 




4 


24-47 



PMSQJ 



Normal completion message 
suppression indicator 

Error message suppression indicator 

PDD size in words 

Return status 

Function code (see chart PM-1) 

Page/entry of main DSC entry 
(PMFCLKDX, PMFCRTDX requests) 

Page number of main DSC entry 
(PMFCLKDX, PMFCRTDX requests) 

Entry number of main DSC entry 
(PMFCLKDX, PMFCRTDX requests) 

Pointer to DXT information buffer 
(PMFCLKDX, PMFCRTDX requests) 

Permanent dataset name 

Characters 1-8 

Characters 9-15 

SDT address 

Returned by PDM for PMFCDQ request 
Input for PMFCEA, PMFCEI, PMFCEO 

48-63 Job sequence number (PMFCDQ request) 



12-35 



36-39 



40-63 
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BEGIN CODE EXECUTION TABLE - BGN 

The BGN Table, illustrated in figure A-10, is input to the F$BGN call 
that allows the user program to indicate to the operating system the 
location of the executable binary and a P address which the CPU can be 
released to. The old BGN format is supported for release 1.14. The 
following functions are supported with the new BGN format: 

• Load a dataset from mass storage as specified by the DSP. 

• Copy memory from a source base address to target base address for 
lengths specified. 

• Preset memory with supplied pattern from preset base address for 
lengths specified. 

Support is included for the separation of instruction and data segments. 
Instruction segments are currently supported and any attempt to load a data 
segment will be aborted. 

Define the F$BGN Function codes: 

BGNLOAD = O'l Load from dataset function code 
BGNCOPY = 0'2 Copy from source to destination 
BGNFMAX = BGNCOPY Set max Function Code value 



0....+....1....+....2....+....3....+....4....+....5....+....6... 

+++ + + + + 

I I I///////////// 1 PRGL I /////// 1 FC | 

+++ + + + + 

1 I I I PSV I 

+++ + + + 

2||| PAD I/////I ENT | 

+++ + + + 

3 I /////////////////////////////////////////////////////////////// I 

+ + + 

4 I /////////////////////////////////////// I DSP I 

+ + + + 

5| IBA | IBL | 

+ + + 

6 | DBA | DBL | 

+ + + 

7 I IHLM | DHLM I 

+ + + 

10 I PDBA | PDBL | 

+ + + 

11 | SIBA | SIBL I 

+ + + 

12 | SDBA | SDBL I 

+ + + 

Figure A-10. Begin Code Execution Table (BGN) 
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Field Word(base8) Bits Description 

BGPSF Preset value flag, If=l, preset segment 

BGEMA 1 EMA setting for new calls, 1=ENABLE 

BGPRGL 16-39 Program length (Old BGN Format only) 

BGFC 48-63 BGN Function Code(0 for old) 

BGPSV 1 0-63 Preset value 

BGBP 2 Breakpoint flag 

BGNRD 2 1 No reduce bit 

BGPAD 2 2-33 Pad value 

BGENT 2 40-63 Entry point for instruction segment 

BGDSP 4 40-63 DSP address of load dataset 

BGIBA 5 0-31 Instruction base address to load to 

BGIBL 5 32-63 Instruction segment length 

BGDBA 6 0-31 Data base address to load to 

BGDBL 6 32-63 Data segment length 

BGIHLM 7 0-31 Instruction segment HLM value 

BGDHLM 7 32-63 Data segment HLM value 

BGPDBA 10 0-31 Preset data base address for pattern 

BGPDBL 10 32-63 Preset data length for pattern 

BGSIBA 11 0-31 Source Instruction base address (COPY) 

BGSIBL 11 32-63 Source Instruction length (COPY) 

BGSDBA 12 0-31 Source Data base address (COPY) 

BGSDBL 12 32-63 Source Data length (COPY) 
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DATASET DEFINITION LIST - DDL 

A Dataset Definition List in the user field must accompany any create DNT 
(F$DNT) request. The DDL is illustrated in figure A-ll. 



0. ...+.... 1....+.... 2.... +....3.... +....4.... +....5.... +....6... 

+ . + + 

I DN I /////// I 

+ + + 

1 I LDV I 
++++++++ ■ ++ ■ + + + 

2 Mill III BFI || ERC I /////////// 1 SZ | 

3 I I I///////////// 1 I DNT I /////// 1 I BFZ | 

4 I////////////////III INC I /////////////////// I DC | 

+ +++ + + + + 

5 I /////////////////////////////////////// I LM | 

+ + + 

Figure A-ll. Dataset Definition List (DDL) 



Field Word(base8) Bits Description 

DDDN 0-55 Dataset name 

DDLDV 1 0-63 
DDRDM 2 



Logical device name 



Random dataset flag: 

Sequential 

1 Random 



DDUDS 



Undefined dataset structure: 

COS blocked dataset structure 

1 Undefined structure 



DDNFE 



Return error if dataset does not 
exist. Register SO returned nonzero 
if DNT does not exist; no DNT is 
created. 



DDSTAT 

DDMR 
DDIA 



Request dataset statistics; ignored 
unless DDNFE=1 (see DDDNT) 

Dataset is to be memory resident 

Interactive type dataset 
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Field Word(base8) Bits Description 



DDTRAN 



DDBPI 



DDBLK 



DDDNT 



7-15 



DDNA 


2 


16 


DDERC 


2 


17-27 


DDSZ 


2 


40-63 


DDSEQ 


3 






16-39 



DDNOF 


3 


48 


DDBFZ 


3 


49-63 


DDC 


4 


17 


DDINC 


4 


19-27 


DDDC 


4 


48-63 


DDLM 


5 


40-63 



Transparent mode for interactive 
dataset 

Blank field indicator (octal) for 
character I/O: 

Value Indicator 
-000 BFI=I@BFI 
400 BFI=User-specified ASCII 
character 
=400 BFI=000 
>400 Blank compression disabled 

No-Abort flag 

Error code if No-Abort set 

Dataset size in 512-word blocks 

Change a dataset from random to 
sequential. Valid only if dataset is 
currently random, ignored if sequential 

Change a dataset form unblocked to 
blocked. Valid only if dataset is 
currently unblocked, ignored if blocked 

Address of DNT image returned by 
F$DNT when DDNFE=1 and DDSTAT=1 

No Overflow flag 

Buffer size in 512-word blocks 
$SYSTXT name 

Allocate contiguous space for request 

Sectors to allocate per request 

Disposition code (two characters) : 

Dataset size limit in 512-word blocks 
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OPEN DATASET NAME TABLE - ODN 

A 2-word Open Dataset Name Table (ODN) is generated in the user field the 
first time an OPEN of the specified dataset is encountered. Figure A-12 
illustrates the ODN, 



0....+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + 

I DN I /////// I 
+++++++-+ + + — -+ + + 

1 lllllll/l LDT |///|OST| DSP | 
+++++++-+ + + + + 

Figure A-12. Open Dataset Name Table (ODN) 

Field Word(base8) Bits Description 

ODDN 0-55 Dataset name 

ODV 1 1 Close volume 

ODM 1 2 Open for 'mod' (append) 

ODS 1 3 Close or open with saved position 

ODH 1 4 Hold resources 

ODUDS 1 5 Open as unblocked flag 

ODLDT 1 8-31 LDT address 

ODOST 1 36-39 Type of open requested 

OSTSA=0 Create DSP/LFT buffer in 

system area 
OSTUA=l Create DSP/LFT/buffer in 

user area 
OSTMSY=2 DSP/LFT/buffer moved to 

system area 

ODDSP 1 40-63 DSP pointer: 

Negative: negative offset 
Positive: absolute address 
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OPTION TABLE - OPT 

The Option Table (OPT) is used for F$OPT calls. Figure A-13 illustrates 
the OPT. 

0.... + ....1 +....2.... + ....3.... + ....4.... +....5 + 6... 

+ + 

I LPP | 
++++ + + 

1 I I I I PNNI //////////////////////////////////////////////////////// 1 
++++ + + 

Figure A-13. Option Table (OPT) 

Field Word(base8) Bits Description 

OPLPP 0-63 Page length 

OPSTAT 1 Dataset statistics enabled 

OPPNCH 1 1 NZ if OPTION, PN selected 

OPPNAS 1 2 NZ if PN=n, ZR if PN=ANY 

OPPNN 1 3-6 Processor number (if @OPPNAS NZ) 
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JCL BLOCK INFORMATION TABLE - JBI 

The 1-word JCL Block Information Table (JBI) is generated in the user 
field and has two formats: one for conditional information (see figure 
A-14) and the other for interative information (see figure A-15) . 

Conditional block information: 



0....+....1....+....2....+....3....+....4....+....5....+....6... 

++ + + -+ -+ 

I I ////////////// 1 LLEV I PLEV | LEVL | 

++ + + + + 

Figure A-14. JCL conditional block information 

Field Word(base8) Bits Description 

JBEXC Conditional sequence is in execution 

JBLLEV 16-31 Conditional is contained in this 

iterative nesting level 

JBPLEV 32-47 Iterative is contained in this 

procedure level 

JBLEVL 48-63 Current iterative nesting level 

Iterative block information: 

0. ...+... .1....+.... 2.... +....3.... +....4.... +....5.. ..+....6... 

+ + + + + 

I /////// 1 CNT | PLEV | LEVL | 
+ + + + + 

Figure A-15. JCL iterative block information 



Field Word(base8) Bits Description 

JBCNT 8-31 Iteration count 

JBPLEV 32-47 Iterative is contained in this 

procedure level 



JBLEVL 



48-63 Current iterative nesting level 
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JCL SYMBOL TABLE - JST 

The 4-word JCL Symbol Table (JST) is generated in the job table area and 
contains information about system and user symbols. See figure A-16. 



0....+....1....+....2....+....3....+....4....+....5....+....6... 

++ + 

I I ////////////////////////////////////////////////////////////// 1 

++ + 

111 SN | 

++++++ + + + + 

2 | || I I I//// 1 TYPE I /////////////////////// 1 LEVL | 

3 I /////////// I LEN | ///| VAL | 

+ + + + + 

Figure A-16. JCL Symbol Table (JST) 



Field Word(base8) Bits Description 



JSCRE 







Create if not found. Available only 
for system use. 



JSSN 
JSLOC 



1 0-63 Symbol name 

2 Local or global. If set, symbol is 

procedure local. 



JSCON 



Constant or variable. If set, 
symbol is constant. 



JSSRS 



System reserved. If set, the symbol 
name is reserved by the system. 



JSUSR 



User settable. If set, symbol may 
be modified by the job. 



JSSYS 



System settable. If set, the symbol 
may be modified by COS. 



JSTYPE 



10-15 One of the following symbol types: 

SYMTUND=O'00 Undefined - no type 
SYMTBOO=O'01 Boolean - logical 
SYMTINT=O'02 Decimal integer 
SYMTLIT=O'03 SCII literal; 1-8 
characters. 
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Field Word(base8) Bits Description 

JSLEVL 2 40-63 Procedure definition level 

JSLEN 3 12-35 Length of value 

JSVAL 3 40-63 Base of value buffer 

LABEL DEFINITION TABLE - LPT 

The Label Definition Table describes the tape label. It consists of four 
parts: the LDT header, volume header, header 1 entry, and header 2 
entry. Except for the LDT header, which points to the other entries, 
these entries are optional and can appear anywhere after the header. The 
following conditions must be met for constructing a Label Definition 
Table (LDT) : 

• The header must be present. 

• The header must precede the first entry. 

• Each entry must be pointed to by the offset value in the LDT 
header. Zero is used for absent fields. 

• The lengths of the whole LDT and of each entry must be set in the 
proper fields. 

• The length value for volume 1 must be at least large enough to 
include the first VSN. The length value for either header 1 or 
header 2 must be at least the defined length of the respective 
entry. 



LDT HEADER 

The LDT header, required on all LDTs, serves the following functions: 

• Specifies the beginning and end of the LDT 

• Specifies the location of each LDT entry with respect to the LDT 
base 

• Identifies non-standard aspects of a dataset 

• Points to labels within a label group 
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The LDT header is illustrated in figure A-17. 

0....+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + + 

I TN I /////////////////////// I TL | 

1 |FD |LT IIII////////////////IIDCI///////I DNT | 
+ + ++++ + + + + + 

2 I /////////////// 1 V1B | H1B | 

+ + + + 

3 I /////////////// I H2B I /////////////////////// I 

+ + + + 

Figure A-17. Label Definition Table (LDT) header 

Field Word(base8) Bits Description 

LDTN 0-23 Table name ('LDT 1 in ASCII) 

LDTL 48-63 Table length (variable) 

LDFD 1 0-3 Foreign dataset translation identifier 

This field is used to indicate whether 
run time foreign dataset translation 
should be performed on this dataset. 

LDLT 1 4-7 Requested label type: 

TPLNL Non-labeled 

1 TPLAL ANSI-standard label 

2 TPLSL IBM standard labels 

LDPROT 1 8 Protected access indicator. If 

non-zero for a new tape dataset then 
the dataset is to be protected on 
the servicing front-end. 

LDCAT 1 9 Cataloged dataset indicator 

LDCV 1 10 Dataset data conversion flag. 

This field is used to indicate whether 
implicit data conversion shall be done 
by the run time library. 

LDIDC 1 28-31 Initial dataset desposition 

TPOLD Old dataset 

1 TPNEW New dataset 
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LDDNT 



LDV1B 



LDH1B 



LDH2B 



40-63 Dataset name table (DNT) pointer. 
The field value is JTA-relative. 

16-39 Offset of volume 1 entry, relative 
to LDT base. If the LDT does not 
contain a VOL1 entry, this field 
must be zero. 

40-63 Offset of header 1 entry, relative 
to LDT base; must be zero if there 
is no HDR1 entry. 

16-39 Offset of header 2 entry, relative 
to LDT base; must be zero if there 
is no HDR2 entry. 



If the tape label is being sent to the front-end for servicing, word 1 of 
the Label Definition Table (LDT) header is redifined as shown in figure 
A-18. 



0.... + 1 + 2 + 3 +....4.... +....5.... +....6... 

+ + + 

1 I /////////////////////////////////////// I FSH | 

+ + + 

Figure A-18. Header redefiniton of LDDNT 

Field Word(base8) Bits Description 

LDFSH 1 40-63 Front-end service header offset 

VOLUME 1 ENTRY 

The volume 1 entry (see figure A-19) corresponds to volume 1 labels for 
all volumes in the dataset. The volume 1 entry may be placed anywhere 
after the header, so long as the LDV1B header field points to it 
properly. The volume 1 entry is optional. 
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0....+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + + 

I V0L1 | VSB | VL1L | 
+ + + + + + 

1 | VSNL | CVN | DT I /////// 1 FVN | 
+ + + + + + 

2 | OID | 
+ + + 

3 I I /////////////// I 

+ + + 

4 I GDN I 

+ ++ — + + + 

5 I VSN | | // | VDC | VAC | 

+ ++ — + + + 

Figure A-19. Label Definition Table (LDT) volume 1 entry 

Field Word(base8) Bits Description 

LDVOL1 0-31 Entry name ('VOL1' in ASCII) 

LDVSB 32-47 Volume serial list base offset 

LDVL1L 48-63 Volume 1 length 

LDVSNL 1 0-15 Number of VSNs in entry 

LDCVN 1 16-31 Current VSN ordinal 

LDDT 1 32-39 Device type 

TPD62 6250 bpi 

1 TPD16 1600 bpi 

LDFVN 1 48-63 Final VSN ordinal: ordinal of VSN 

corresponding with the volume 
sequence number in access condition 

LDOID 2-3 0-63 Owner identifier 

LDOID1 2 0-63 Characters 1-8 

LDOID2 3 0-47 Characters 9-14 

LDGDN 4 0-63 Generic device name 

LDVSN 5 0-47 Beginning VSN 
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Field Word(base8) Bits Description 

LDVRG 5 48 Volume-registered flag, set by a 

servicing front-end. When set, the 
VSN is from front-end catalog. 

LDVDC 5 52-55 Volume disposition 

TPOLD Existing dataset 

1 TPNEW New volume to dataset 

LDVAC 5 56-63 Volume accessibility character, 

obtained from the label group 

Word 5 of the Label Definition Table (LDT) volume 1 entry is the 
beginning of the VSN list. Each VSN requires one word as shown in figure 
A-20. The maximum number of VSNs is an installation defined parameter, 
which is given as I@TMV. 

0....+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + 

5 I VSN1 I /////////////// I 

+ + + 

Figure A-20. Beginning of VSN list 



Field Word(base8) Bits Description 
LDVSN1 5 0-47 



LE@ V0L1=W@LDVSN+I @TMV 
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HEADER 1 ENTRY 

The header 1 entry (see figure A-21) describes dataset attributes and 
corresponds to the HDRl, E0F1, and EOV1 labels for all volumes in the 
dataset. Header 1 shows numeric fields in both binary and ASCII 
characters. COS uses the ASCII equivalents for generating and validating 
the label group. If a field is changed, both versions must be changed. 
ASCII fields are right- justified with leading zeros. The header 1 entry 
is optional and can be placed anywhere after the header, so long as it is 
pointed to by header field LDH1B. 



0. ... + .... 1....+. ... 2.... +....3.... +....4.... +....5.... +....6... 

+ + + + 

I HDRl I /////////////// I HR1L | 

+ + + + 

1 | FID1 I 

+ + 

2 | FID2 I 
+ + 

3 | FID3 I 

+ • + 

4 | FID4 I 

+ + 

5 I FID5 I 

+ + + + 

6 | FID6 | CVSQ | FVSQ | 

+ + + + 

7 I FSEC | CSEC I 

+ + + + + 

10 | FSEQ | DAC | VN | FSQ | 

+ + + + + 

11 I GEN | GN | GVN I 

+ + + + 

12 I CDT I /////////////// I 

+ ++ + 

13 I XDT || RT | 

+ ++ + 

14 I BLK I /////////////// I 

+ + + 

15 I SET | /////////////// I 

+ + + + 

16 | FBC | VBC | 

+ + + 

17 | SCOD I 
+ + + 

20 I I /////////////////////// I 

+ + + 

Figure A-21. Label Definition Table (LDT) header 1 entry 
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Field Woi 


:d(base8] 


1 Bits 


Description 


LDHDR1 





0-31 


Entry name 


(*HDR1' in ASCII) 


LDHR1L 





48-63 


Header 1 length 


LDFID1 


1 


0-63 


Characters 


1-8 


LDFID2 


2 


0-63 


Characters 


9-16 


LDFID3 


3 


0-63 


Characters 


17-24 


LDFID4 


4 


0-63 


Characters 


25-32 


LDFID5 


5 


0-63 


Characters 


33-40 


LDFID6 


6 


0-31 


Characters 


41-44 


LDCVSQ 


6 


32-47 


Current volume sequence numb 



section number) , binary equivalent 
of LDCSEC 



LDFVSQ 



48-63 First volume sequence number (file 
section number) , binary equivalent 
of LDFSEC 



LDFSEC 



0-31 First file section number (volume 
sequence number) in ASCII, the 
ordinal number of the volume to be 
mounted first 



LDCSEC 



LDFSEQ 



7 32-63 Current file section number (volume 
sequence number) in ASCII, the 
ordinal number of the currently 
mounted volume 

10 0-31 File sequence number (ASCII) ordinal 
of the dataset being accessed. If 
FSEQ < 1, volume should have more 
than one dataset. 



LDDAC 10 32-39 
LDVN 10 40-47 



LDFSQ 



10 48-63 



Dataset accessibility character. 

Generation version number, numeric 
equivalent of LDGVN 

File sequence number, numeric 
equivalent of LDFSEQ 
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Field Word(base8) Bits Description 



LDGEN 



11 0-31 Generation number. Any value other 
than one indicates that a dataset is 
in a generation data group. 



LDGN 



LDGVN 



LDCDT 



11 32-47 Generation number, numeric 
equivalent of LDGEN 

11 48-63 Generation version number (ASCII) . 

Any value other than indicates 
that the dataset is in a generation 
data group. 

12 0-47 Creation date (ASCII) . This field 

indicates the creation date of the 
dataset in the Julian form: 
'yyddd 1 . Note the space (LDCSP) 
must be present. 



LDCSP 


12 


0-7 


Space 


LDCYR 


12 


8-23 


Year 


LDCDY 


12 


24-47 


Day 



LDXDT 



13 0-47 Expiration date; same format as 
creation date above 



LDXSP 


13 


0-7 


Space 


LDXYR 


13 


8-23 


Year 


LDXDY 


13 


24-47 


Day 



LDUXD 

LDRT 
LDBLK 



13 48 User specified XDT (expiration date) 
flag 

13 49-63 Retention period, integer days 

14 0-47 Volume block count (ASCII) : number 

of user data blocks present, read 
from or written into the label. Can 
be inaccurate because overflow 
causes it to be cleared; see LDVBC 
for an accurate count. 



LDSET 



15 0-47 File set identifier, normally set to 
the serial number of first volume in 
the dataset 



LDFBC 



16 



0-31 File block count (binary) 
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Field Word (base 8) Bits Description 

LDVBC 16 32-63 Volume block count (binary) , number 

of blocks written on volume so far 

LDSCOD 17-20 0-63 System identification code, to 

identify the operating system or 
computer system that generated the 
tape 

LDSCD1 17 0-63 Character 1-8 

LDSCD2 20 0-39 Character 9-13 

Identify the operating system or 
computer system that generated the 
tape: 

LE@HDR1=W@LDSCD2+1 



HEADER 2 ENTRY 

The header 2 entry (see figure A-22) describes dataset attributes and 
corresponds to the HDR2, EOF2, and EOV2 labels for all volumes in the 
dataset. Header 2 shows numeric fields in both binary and ASCII 
characters. COS uses the ASCII equivalents for generating and validating 
the label group. If a field is changed, both versions must be changed. 
ASCII fields are right-justified with leading zeros. The header 2 entry 
is optional and can be placed anywhere after the header, as it is pointed 
to by header field LDH2B. 



0. ...+.... 1.. ..+.... 2.... +....3.... +....4.... +....5. ...+....6... 

+ + + + 

I HDR2 I /////////////// 1 HR2L | 
+ + + + + + + 

1 I PMT | BA | RF I //////// 1 MBS I 
+ + + + + + 

2 I BFO I /////////////// I MRS I 
+ ■ + -+ + + 

3 I BL | /////////////////////// I 

+ + + 

4 I RL I /////////////////////// I 

+ + + 

Figure A-22. Label Definition Table (LDT) header 2 entry 
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Field Word(base8) Bits Description 

LDHDR2 0-31 Entry name ( , HDR2' in ASCII) 



LDHR2L 
LDFMT 



LDBA 



LDRF 



48-63 Header 2 length 

1 0-7 Record format, two types 

IBM label types: 

F Fixed-length records 
V Variable-length records 
U Undefined record format 

ANSI label types: 

F Fixed-length records 
D Variable-length records 
S Records span tape blocks 

1 8-15 Blocking attributes, IBM label types 
only: 

B Blocks are an integral multiple 

of the record size 
S Records span tape blocks 
R Records span tape blocks, and 
the blocks are an integral 
multiple of the record size 

1 16-22 Record format. 



LDMBS 



LDBFO 



LDMRS 



32-63 Maximum block size (binary) , maximum 
size of any tape block that can be 
read or written 

0-15 Buffer offset, ANSI only (not 
currently supported by COS) 

32-63 Maximum record size (binary) , 

maximum size of any record that can 
be read or written 



LDBL 



LDRL 



0-39 Maximum block size (ASCII) , maximum 
number of bytes in a tape block, 
read from or written into the 
label. Can be inaccurate because 
overflow causes it to be cleared; 
see LDMBS for an accurate count. 

0-39 Maximum record size (ASCII) , maximum 
number of bytes in a tape record, 
read from or written into the 
label. Can be inaccurate because 
overflow causes it to be cleared; 
see LDMRS for an accurate count. 

LE@HDR2=W@LDRL+1 
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EVENT RECALL PARAMETER BLOCK - ERPB 

The ERPB, shown in figure A-23, is the parameter block used with F$ERCL 
requests. 



0....+....1... .+.... 2. ...+... .3.... +....4... •+.... 5. ...+.... 6... 

+ + + + 

I ERFUNC I //////////////////////////////// | ERTO | 
+ + + + + 

1 I /////////////// I ERMASK | ERMAP | 

+ + + + 

Figure A-23. Event Recall parameter block 



Field Word(base8) Bits Description 



ERFUNC 







0-6 Subfunction code 



The functions range from ERCL$$MI to 
ERCL$$MA-1. When subf unctions are 
added adjust the ERCL$$ symbols as 
needed . 



ERCL$DIS=01 

ERCL$ENA=02 

ERCL$RCL=03 
ERCL$RET=04 

ERCL$$MI=01 
ERCL$$MA=05 



Disable event 

monitoring 

Enable event 

monitoring 

Recall untill event 

Return occurred-events 

map 
Minimum subfunction 
Maximum subfunction+1 



ERTO 
ERMASK 



40-63 Timeout value (milliseconds) 



1 16-39 Event selection mask 



ERCL$$ values must be changed when new 
events are added. Bits zero thru 
ERM$$MAX-1 must always be defined. 
Bits ERM$$FP thru ERM$$LP-1 must always 
be defined. 



ERMSIJ 
ERMSUO 



16 Inter-job message arrived 

17 Unsolicited oper msg arrived 
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Field Word(base8) Bits Description 



ERMSOR 



18 



ERMSCH 


1 


26 


ERMSIQ 


1 


27 


ERMSOQ 


1 


28 



Operator reply arrived 

ERM$$MAX=D'18+1 Last non-privileged 

bit+1 
ERM$$FP=D'26 First privileged 
bit 
Channel function done 
SDT placed in INPUT queue 
SDT placed in OUTPUT queue 

ERM$$LP=D'28+1 Last privileged 
bit+1 



(MAP 


1 


40-63 


ERMPIJ 


1 


40 


ERMPUO 


1 


41 


ERMPOR 


1 


42 


ERMPCH 


1 


50 


ERMPIQ 


1 


51 


ERMPOQ 


1 


52 



Occur red-events map 

Inter- job message arrived 
Unsolicited oper msg arrived 
Operator reply arrived 
Channel function done 
SDT placed in INPUT queue 
SDT placed in OUTPUT queue 

On return from F$ERCL r 
SO can have the following 
values . 



00 Okay 

ERER$MT=01 

ERER$PV=02 

ERER$BFN=03 

ERER$UDB=04 

ERER$MDI=05 



Prohibited to 

multitasking job 

Not a privileged job 

Bad function 

Mask contains undefined 

bits 

Monitoring not enabled 
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USER DRIVER PARAMETER BLOCK - DRPB 

The DRPB, as shown in figure A-24, is the parameter block used with 
P$DRIVER requests. 



0. ...+.... 1....+.... 2.... +....3.... +....4.... +....5. ...+....6... 

+ + + 

I ///////////////////////////////////////////////////////// I PLEN | 

+ + + 

1 I FUNC I 

+ + 

2 | COSS I 

++ + 

3 I I ////////////////////////////////////////////////////////////// 1 

++ + 

4 I DRS I 
+ + 

5 1 DP I 
+ + 

6 1 LN I 
+ + 

7 I DRNM I 
+ + + 

10 I /////////////////////////////////////////////// I TO | 
+ + + 

11 I DIR | 
+ + 

12 | OPD I 
+ + + 

13 i /////////////////////////////////////// I BAD1 | 

+ + + + 

14 I /////////////////////////////////////////////// I DLN1 | 

+ + + 

15 I /////////////////////////////////////////////// I TLN1 | 
+ + + + 

16 I /////////////////////////////////////// I BAD2 | 

+ + +. + 

17 I /////////////////////////////////////////////// I DLN2 | 

+ + + 

20 I /////////////////////////////////////////////// I TLN2 | 

+ + + 

21 I DPP1 I 

+ + 

22 | DFP2 I 

+ + 

23 I DFP3 I 
+ + 

24 | SPAR I 
+ + 

Figure A-24. Channel Access parameter block 
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Field Word(base8) Bits Description 



DRPLEN 
DRFUNC 



58-63 Parameter block length 

1 0-63 Subfunction code 

The following line is a *CALL to 
comdeck COMAPFC. 

CFN$xxx codes are used to specify the 
type of request to the shell and/or 
driver. 



If codes are added, CFN$MIN, CFN$RSV, 
CFN$DMIN, and CFN$DMAX must be updated 
accordingly. 



CFN$MIN=3 

CFN$OPE=3 

CFN$CLS=4 

CFN$RD=5 

CFN$RDH=6 

CFN$RDD=7 

CFN$WT=D ' 8 
CFN$WTH=D ' 9 

CFN$WTD=D'10 

CFN$RSV=D , 11 

thru D'31 
CFN$DMIN=D'32 

CFN$DMAX=D'127 



Minimum legal code 

Driver Open 

Driver close 

Read header 

Read header and 

hold data 

Read both header 

and data 

Write header 

Write header and 

hold data 

Write header and 

data 

Reserved 

Minimum legal 
driver function code 
Maximum legal 
driver function code 



CST$xxx codes are returned by the 
shell and drivers. 



CST$CMP=0 
CST$MIN= 

CST$CMP 
CST$PR0=3 
CST$CHN=4 
CST$FCN=5 
CST$DVN=6 
CST$DAE=7 
CST$DLE«D*8 
CST$MAX= 

CST$DLE 



Complete 

Minimum status 
Protocol error 
Illegal channel number 
Illegal function code 
Illegal driver name 
Data address error 
Data length error 

Maximum status 



SR-0011 



A-50 



M 



Field 



Word(base8) Bits Description 

D'9 - D'31 



DRCOSS 



Reserved 



0-63 



DRCOMS 


3 





DRDRS 


4 


0-63 


DRDP 


5 


0-63 


DRLN 


6 


0-63 


DRDRNM 


7 


0-63 


DRTO 


10 


48-63 



CST$DMIN=D'32 Min driver specific 

code 
CST$DMAX=D*127 Max driver specific 

code 

CST$xxx codes for loopback driver. 

CST$TMO=D'32 Loopback Driver 
timeout 

Status of the request. 
DRS$OK=0 Okay 
DRS$CN0=1 Channel is not open 
DRS$CA0=2 Channel is already open 
DRS$RSV=3 Channel is reserved to 

another task 
DRS$CUK=4 Channel is unknown 
DRS$OFF=5 Channel is off 
DRS$BA1=6 Bad bufferl address 
DRS$BA2=7 Bad buffer 2 address 
DRS$BL1=8 Bad bufferl length 
DRS$BL2=9 Bad buffer2 length 
DRS$BPS=10 Bad parameter size 
DRS$BDI=11 Bad channel direction 
DRS$BSY=12 Channel is busy 
DRS$BFN=13 Bad function 
DRS$NMT=14 Not available to 

multitasking jobs 
DRS$NRS=15 Channel is not 

reserved to you 
DRS$MIN= 

DRS$0K Min status 
DRS$MAX= 

DRS$NRS+1 Max status+1 

'Driver complete* status 

Driver and shell status 

Driver parameter 

Logical channel name; 1-7 chars. 
Left justified, blank filled. 

Driver name 

Driver timeout in tenths of a second 
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Field Word(base8) Bits Description 



DRDIR 



11 



0-63 



DROPD 


12 


0-63 


DRBAD1 


13 


40-63 


DRDLN1 


14 


48-63 


DRTLN1 


15 


48-63 


DRBAD2 


16 


40-63 



DRDLN2 



DRTLN2 



17 



20 



48-63 



48-63 



DRDFP1 


21 


0-63 


DRDFP2 


22 


0-63 


DRDFP3 


23 


0-63 


DRSPAR 


24 


0-63 



Direction of channel 
DIR$INP=0 Input 
DIR$OUT=l Output 

OPEN driver spare 

Bufferl address 

Datal length 

Transferl length 

Buffer 2 address. Used only with 
CFN$RDD, CFN$WTH, and CFN$WTD 

Data2 length. Used only with CFN$RDD, 
CFN$RDH, CFN$WTH, and CFN$WTD 

Transfer 2 length. Length of data 
actually transferred from RDBAD2 

DRIVER function parameters 

DRIVER function parameters 

DRIVER function parameters 

Spare for future use 



RECEPTIVE CONTROL BLOCK - RCB 

The Receptive Control Block (RCB), shown in figure A-25, exists in the 
user field of jobs that are receptive to inter-job communication 
requests. There is one RCB per ID. 



ID 



Figure A-25. Receptive control block 
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Field Word(base8) Bits Description 

RCBID 0-63 ID of the job requesting connection 



NODE CONTROL BLOCK - NCB 

The Node Control Block (NCB), shown in figure A-26, exists in the user 
field of jobs having interjob communication paths and contains 
information about those paths. There is one NCB per node. 

+....1....+....2....+....3....+....4....+....5....+....6... 

+ + + 

I /////////////////////////////////////// I NCPN | 

+ + + 

1 I /////////////////////////////////////// I LEN | 

+ + + 

2 I /////////////////////////////////////// I ADD | 

+ + + 

3 | NCST I 

+ + 

Figure A-26. Node control block 

Field Word(base8) Bits Description 

NCPN 40-63 IPT offset for this path 

NCBLEN 1 40-63 Length of the node buffer 

NCBADD 2 40-63 Address of the node buffer 

NCST 3 0-63 Status 

NCMS 3 Message status 
NCOS 3 48-63 Open status 

If any values are changed, SYSLIB must be changed also. 

NCB$ACC='AC'R Open request 
accepted 

NCB$REJ= , RJ , R Open request 
rejected 

NCB$CLO='CL'R Path was closed 
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INTERJOB COMMUNICATION MESSAGE BUFFER - MHB 

The Inter job Communication Message Buffer, shown in figure A-27, exists 
in the user field of jobs having inter job communication paths. One 
buffer per node exists. The buffer contains a header followed by the 
message body. The buffer header contains information about the message 
and the buffer body contains the message itself. 



0....+....1....+....2....+....3....+....4....+....5....+....6. . . 

+ + 

| MHALEN I 

+ + 

1 | MHSLEN I 

+ + 

Figure A-27. Inter job Communication Message Buffer 



Field Word(base8) Bits Description 



MHALEN 
MHSLEN 



0-63 Length of message put into the buffer 

1 0-63 Length of the message sent 



This header will be followed by 
message data in the format defined 
by the communicating tasks. 



INTERJOB COMMUNICATION PARAMETER BLOCK - IJPB 

The Inter job Communication Parameter Block (IJPB), shown in figure A-28, 
is the parameter block used with F$IJMSG requests. 
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0. ...+.... 1....+.... 2. ...+.... 3.... +....4.... +....5.... +....6... 

+ + + + 

| LEN l*****l//////////////////////////////////////////////////| 
+ + + + + 

1 I /////////////////////////////////////// I ULINK | 

+ + + 

2 I IJSTAT I 

+ . + 

3 I IJFUNC I 

+ + 

4 | IJRID I 

+ + 

5 I IJTID I 

+ + + 

6 I /////////////////////////////////////// I IJRCB | 

+ + + 

7 I /////////////////////////////////////// I IJNCB | 

+ + + + 

10 I /////////////////////////////////////////////// I IJBLEN | 

+ + + + 

11 I /////////////////////////////////////// I IJBADD | 

+ + + 

12 | IJOVR I 

+ + 

13 I IJFCS I 

+ + 

14 | IJFCU I 

+ + 

15 I IJCLS I 

+ + 

Figure A-28. Inter job communication parameter block 

Field Word(base8) Bits Description 

IJPLEN 0-6 Length of the parameter block 

IJHLEN 7-12 Message buffer header length (LH@MHB) 

ULINK 1 40-63 Link to next parameter block 

IJSTAT 2 0-63 Status 

IJMS$OK=00 Completed with no 
error 

The following responses do not 
terminate a request chain. If any 
values are changed, SYSLIB must be 
changed also. 
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Field Word(base8) Bits Description 



IJMS$AR=01 ID is already receptive 
IJMS$AU=02 ID is in use 
IJMS$BA=03 Buffer address or 

length bad 
IJMS$BN=04 NCB is bad 
IJMS$BNA=05 NCB address is bad 
IJMS$BP=06 Path is busy 
IJMS$HL=07 HLEN error 
IJMS$IF=08 IPT full 
IJMS$INR=09 ID not registered 
IJMS$INS=10 ID not specified 
IJMS$MC=11 Bad log message class 
IJMS$ML=12 Bad message length 
IJMS$NA=13 ID is not attached 
IJMS$NE=14 Path is not open 
IJMS$N0=15 No outstanding open 

request 
IJMS$NP=16 Path does not exist 
IJMS$NR=17 ID is not receptive 
IJMS$00=18 Outstanding OPEN was 

found 
IJMS$PE=19 Path is already 

established 
IJMS$PF=20 Memory pool is full 
IJMS$PR=21 ID is privileged 
IJMS$RB=22 Bad RCB address 
IJMS$RF=23 RIT full 
IJMS$TA=24 Target's buffer 

address is bad 
IJMS$TL=25 Target's buffer length 

is bad 

The following responses terminate a 
request chain. 



IJFUNC 



0-63 



IJMS$BE=32 IJPB length error 
IJMS$BF=33 Undefined function 
IJMS$LA=34 Bad link address 
IJMS$MT=35 More than one active TXT 
IJMS$NC=36 RIT or IPT has zero 

entries 
IJMS$PV=37 Privileged function 
IJMS$TP=38 More than I@MPBS 
parameter blocks 
IJMS$MAX=39 Maximum status value + 1 
Subfunction code 



If any values are changed, SYSLIB must 
be changed also . 
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Field Word (base 8) Bits Description 



IJRID 


4 


0-63 


IJTID 


5 


0-63 


IJRCB 


6 


40-63 


IJNCB 


7 


40-63 


IJBLEN 


10 


48-63 


IJBADD 


11 


40-63 


IJOVR 


12 


0-63 


IJPCS 


13 


0-63 


IJFCU 


14 


0-63 


IJCLS 


15 


0-63 



IJM$NOP=00 No op 

IJM$REC=01 Request receptivity 

state 
IJM$OPEN=02 Open a communication 

path 
IJM$ACCE=03 Accept an IJM$OPEN 

request 
IJM$REJE=04 Reject an IJM$OPEN 

request 
IJM$SNDM=05 Send a message 
IJM$CLOS=06 Close a 

communication path 
IJM$END=07 Ends the receptivity 

state 
IJM$$HNP=07+1 Maximum value + 1 of 

unprivileged 

subfunctions 
IJM$$MIP=32 Minimum privileged 

function value 
IJM$SNDL=32 Send a logfile 

message (privileged) 
IJM$$MAX s =32+l Maximum subfunction 

value + 1 

ID of the requesting job 
ID of the target job 
RCB address 
NCB address 
Message buffer length 
Message buffer address 
Log message over-ride flag 
Log message to system log 
Log message to user log 
Log message class 
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SUBSYSTEM SUPPORT B 



Subsystem Support provides a mechanism for the user to develop code 
that would otherwise have to be incorporated as part of the Cray 
Operating System (COS) . Examples of this kind of code are networking 
packages and online diagnostics. 

Subsystem Support is a collection of independent functions whose use 
may be restricted to jobs granted the necessary privilege by COS. 

This appendix describes the following Subsystem Support functions: 

• Inter job communication 

• User channel access 

• Event recall 



INTERJOB COMMUNICATION 

A job may communicate with one or more other jobs. This feature is 
available to all single-tasking jobs. It is prohibited to multitasking 
jobs. 

To establish communication, one job indicates it is receptive to 
communication, and the others request to open a communication path 
between themselves and the receptive job. Once a path is established, 
jobs may freely exchange messages. Any one job may open as many 
communication paths as it needs. An installation defined parameter, 
I@MIJPA, determines the total number of communication paths allowed in 
the system at one time. 

Message exchange is memory to memory between jobs if both are resident. 
Otherwise, messages are queued for rolled out jobs. The maximum length 
of a message is determined by an installation defined parameter, I@MIJML. 

A receptive job may place a message in the user logf ile of any connected 
job. This is a privileged function. 
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ESTABLISHING COMMUNICATION 

Each job must have at least one unique nonzero 64-bit ID. The programmer 
chooses the ID, so must know the IDs of the communicating jobs. See your 
site analyst for the IDs of system supported programs. Because system 
supported programs commonly have IDs that begin with a $, refrain from 
using this format when choosing an ID. 

A job becomes receptive through a system request specifying its ID and 
the location of its Receptive Control Block (RCB) . The system uses this 
RCB when processing requests from other jobs to find out if this job 
allows a communication path to be established with another job. The RCB 
is one word long and is set to by the system when the job becomes 
receptive. When another job makes a request to open communication, that 
job's ID is placed in the RCB. The RCB is always set by the system and 
read by the user. The user should never write into the RCB. 

A job attempts to establish a communication path with another job by 
making a system request, specifying its ID and the ID of the target job. 
If the target job is receptive the system will put the requesting job's 
ID into the target job's RCB if the target job is resident and its RCB is 
0. Otherwise, the request is queued. No further requests may be made to 
the target job until a response is received. The target job polls its 
RCB for a nonzero value, indicating a request for connection. The target 
job screens out undesirable jobs. The target job accepts or rejects the 
attempt to establish communication by making a system request and 
indicating its response (accept or reject) , its ID, and the ID of the 
initiating job. If it accepts, the communication path is established, 
and messages can be transferred freely. The job that requested that a 
communication path be established is said to be attached to the target 
job. Upon receipt of the response, whether accept or reject, the system 
places in the. RCB, the ID of the next job requesting that a path be 
established. If there is no job requesting a path, the RCB is set to 0. 

The communication path consists of two nodes, one in each job. Each node 
consists of a Node Control Block (NCB) and a message buffer (MHB) . The 
NCB consists of a pointer to the message buffer, the length of the 
buffer, and status indicators. The message status indicator must be 
polled to see if a message arrived. A zero-length message indicates a 
change in open status may have occurred. The open status indicates 
whether a reply to an open request arrived or the other job closed this 
path. Each job is responsible for clearing its message status after it 
has taken appropriate action. No further messages will be put into a 
buffer until the message status is 0. The NCB allows dynamic message 
buffers. The job may change the size of MHB with or without relocating 
it, but this change can only be made when the message status has been set 
by the system. When the message status has been set by the system, the 
system will not do anything further with that buffer until the user 
clears the status. The job can then change the buffer and clear the 
message status (in that order) so the system resumes message transfer to 
that node. 
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When a job requests that a communication path be established with another 
job, the requesting job sends the location of its NCB in the request. 
When the target job replies, it sends the location of its NCB in the 
reply. So, the communication path is well defined. Figure B-l 
illustrates a typical subsystem inter job communication structure. 



NCB1 



Message buffer 



NCB2 



Message buffer 



NCB3 



Message buffer 



Figure B-l. A typical subsystem inter job communication structure 



The job in figure B-l has communication paths established with three 
other jobs. Messages from J0B1 are placed in the buffer pointed to by 
NCB1, while J0B3's messages are placed in the buffer pointed to by NCB3. 
The location of the buffers is not important. The NCBs, however, should 
be allocated so V registers can be used to poll for nonzero status values, 



A job may use more than one ID in its communications, 
multiple paths between jobs. 



This allows for 



SENDING AND RECEIVING MESSAGES 

When a communication path has been established, a job sends a message by 
making a system request indicating the location and length of the message 
to be sent, and an NCB address. 
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If a job's NCB message status indicates that a message has been placed in 
its message buffer, the job may read the message in the buffer and clear 
its NCB message status. The message appears directly after a message 
header. The header contains the length of the message sent and the 
length of the message actually put in the buffer. A message that is too 
large for the buffer is truncated. No further action is taken by the 
system. 

Message exchange is memory to memory when both jobs are resident. 
Otherwise, one message per node is queued for any job that is rolled out 
or has a nonzero NCB message status. All requests to send a message to a 
job that already has a message queued are rejected with a busy status. 
If no pool space is available to queue a message, a pool-full message is 
returned. The job tries again later. 

When a program removes messages from message buffers and clears the 
message status, it issues an event recall return or recall function. 
This assures that queued messages move into the buffers as quickly as 
possible rather than wait for the system to detect that buffers are 
available for new messages. 

Sending an ASCII message to an attached job's logfile is a privilege and 
can be done by making a system request specifying the location of the 
message, an NCB address, a message class indicator, destination 
indicator, and an Override flag. The message must be 1 through 80 
characters and must be terminated by a zero byte if less than 80 
characters. 



CLOSING COMMUNICATION PATHS 

A job may close all communication paths with a given ID by specifying 
that ID and an NCB address. A job closes a specific communication path 
by making a system request specifying its ID, an NCB address, and another 
job's ID. The closing job informs the other job of its intention to 
close communication before the close request is made. Any messages 
queued on either end of this path are discarded and a zero-length "path 
closed" message is placed in the other job's message buffer or queued for 
the other job. If a job receives a zero-length message it checks its NCB 
open status for a change. 

A job gives up its receptivity by making a system request specifying its 
ID. This request does not affect existing communication paths but 
prevents future open requests' referring to that ID from being posted. 
If there are any open requests pending when this request is made, a 
status indicator is returned in the NCB, and the ID is placed in the 
RCB. The job's receptivity is ended, but the job continues to accept or 
reject open requests until the RCB is returned with a value. The 
indicates that no more open requests are queued for this job. If the job 
does not perform this function, the queued open requests remain until 
either the job becomes receptive again or job advance occurs. 
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All communication must be closed before the end of each job step or the 
job aborts. Communication paths do not affect the recoverability of a 
job. If a job with paths established is recovered, all paths are 
eliminated and the job reestablishes the paths. A job using an 
established communication path detects this occurrence when an 
ID-not-established status is returned in response to a communication 
request. 



SYSTEM REQUESTS 

The system requests available are F$IJMSG requests with the following 
functions: IJM$NOP, IJM$REC, IJM$OPEN, IJM$ACCE, IJM$REJE, IJM$SNDM, 
IJM$SNDL, IJM$CLOS, and IJM$END. Each request requires a parameter block 
(IJPB) • Up to an installation-defined maximum number of parameter blocks 
(I@MPBS) can be linked together allowing for multiple requests with one 
F$IJMSG system request. 



USER CHANNEL ACCESS 

A job can communicate directly with a user-supplied driver using open, 
read, write, close, and special driver requests. These requests require 
the specification of a logical channel name, a return status word, and 
various buffer information. This is a privileged feature available to 
single-tasking jobs but prohibited to multitasking jobs. 

A user accesses a user-supplied driver with the F$DRIVER system request, 
DRIVER macro, or DRIVER FORTRAN subroutine. Only one request for a 
channel may be outstanding at a time. 

The user opens a channel by specifying a logical channel name, a channel 
timeout value, a driver name, and an I/O direction. If no timeout value 
is specified, the system uses an installation-defined value (IGCHATIM) . 
All subsequent functions on this channel use this value unless a timeout 
value is specified with a specific function. Specify the driver name 
only if the system is not to use the standard driver for the given 
channel. The input (or output) channel must be opened before it can be 
read (or written). Opening the channel automatically reserves it. The 
system rejects all subsequent requests from other jobs for that channel 
until the job closes the channel. 

Close a channel by specifying the channel name and direction. The 
channel reservation is released when the channel is closed. 
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The user can send a message to the operator requesting that a channel be 
turned on or off (see Job-to-Operator Communication). 

Transfer data by specifying the channel name (the direction is not 
needed) , the address of the buffer to or from which data is to be 
transferred, and the length of the data to be transferred. The system 
returns the length of the data actually transferred. 

Issue special requests defined in the individual driver specifications by 
specifying the channel name and direction. See the individual driver 
specifications for other requirements. 

For each function, send additional data to the driver (for example, the 
timeout value for this function) in a reserved driver word in the request 
parameter block. The driver returns information to the user in this 
word. See the individual driver specifications for the use of this word. 

Job termination closes and releases all channels currently belonging to a 
job. Open channels do not affect the recoverability of a job. In the 
event that a job with opened channels is recovered, all channel links are 
eliminated and it is the responsibility of the job to re-open them. A 
job can detect this occurrence when the status "Channel doesn't belong to 
you" is returned in response to a channel request. 



EVENT RECALL 

An event recall request can cause a job to suspend until an event 
occurs. When the event occurs, the job is recalled and the event 
reported. This feature is available to all single- tasking jobs but is 
prohibited to multitasking jobs. 

Event recall has two phases: waiting for events and discovering whether 
events have occurred. If one or more of the following events is 
requested in a job, the job is released from recall when the event 
occurs. Note that some of the events are privileged. 

• Timeout elapsed 

• Interjob communication message received 

• Unsolicited operator message received^ 

• Operator reply received 

• Channel driver completed (privileged) 

• An SDT placed in the INPUT queue (privileged)^ 

• An SDT placed in the OUTPUT queue (privileged) 



t Deferred implementation 
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A timeout event is always enabled in order to prevent a job's being 
suspended indefinitely. 

The F$ERCL system request, ERECALL system macro, and FORTRAN ERECALL 
subroutines are available for event recall. 
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CHARACTER SET 



The ASCII character set contains 128 control and graphic characters shown 
in the following table. Numbers, letters, and special characters that 
form the Cray FORTRAN character set are identified by the appearance of 
the letter C in the fourth column. All other characters are members of 
the auxiliary character set. The letter A in the fourth column of the 
table indicates those characters belonging to the ANSI FORTRAN character 
set. 

The letters that appear in parentheses following the descriptions in the 
fifth column indicate the following control character usage. 

• CC - Communication control 

• FE - Format effector 

• IS - Information separator 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




NUL 


000 


12-0-9-8-1 




Null 


SOH 


001 


12-9-1 




Start of heading (CC) 


STX 


002 


12-9-2 




Start of text (CC) 


ETX 


003 


12-9-3 




End of text (CC) 


EOT 


004 


9-7 




End of transmission (CC) 


ENQ 


005 


0-9-8-5 




Enquiry (CC) 


ACK 


006 


0-9-8-6 




Acknowledge (CC) 


BEL 


007 


0-9-8-7 




Bell (audible or attention 
signal) 


BS 


010 


11-9-6 




Backspace (FE) 


HT 


011 


12-9-5 




Horizontal tabulation (FE) 


LF 


012 


0-9-5 




Line feed (FE) 


VT 


013 


12-9-8-3 




Vertical tabulation (FE) 


FF 


014 


12-9-8-4 




Form feed (FE) 


CR 


015 


12-9-8-5 




Carriage return (FE) 


SO 


016 


12-9-8-6 




Shift out 


SI 


017 


12-9-8-7 




Shift in 


DLE 


020 


12-11-9-8-1 




Data link escape (CC) 


DC1 


021 


11-9-1 




Device control 1 


DC2 


022 


11-9-2 




Device control 2 


DC3 


023 


11-9-3 




Device control 3 


DC4 


024 


9-8-4 




Device control 4 (stop) 


NAK 


025 


9-8-5 




Negative acknowledge (CC) 


SYN 


026 


9-2 




Synchronous idle (CC) 


ETB 


027 


0-9-6 




End of transmission block (CC) 


CAN 


030 


11-9-8 




Cancel 


EM 


031 


11-9-8-1 




End of medium 


SUB 


032 


9-8-7 




Substitute 


ESC 


033 


0-9-7 




Escape 


FS 


034 


11-9-8-4 




File separator (IS) 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




GS 


035 


11-9-8-5 




Group separator (IS) 


RS 


036 


11-9-8-6 




Record separator (IS) 


US 


037 


11-9-8-7 




Unit separator (IS) 


(Space) 


040 


(None) 


A,C 


Space (blank) 


• 


041 


12-8-7 




Exclamation mark 


n 


042 


8-7 


C 


Quotation marks (diaeresis) 


# 


043 


8-3 




Number sign 


$ 


044 


11-8-3 


A,C 


Dollar sign (currency symbol) 


% 


045 


0-8-4 




Percent 


& 


046 


12 




Ampersand 


i 


047 


8-5 


A r C 


Apostrophe (single close 
quotation) 


( 


050 


12-8-5 


A,C 


Opening (left) parenthesis 


) 


051 


11-8-5 


A,C 


Closing (right) parenthesis 


* 


052 


11-8-4 


A,C 


Asterisk 


+ 


053 


12-8-6 


A r C 


Plus 


i 


054 


0-8-3 


A,C 


Comma (cedilla) 


- 


055 


11 


A,C 


Minus (hyphen) 


• 


056 


12-8-3 


A,C 


Period (decimal point) 


/ 


057 


0-1 


A f C 


Slant (slash, virgule) 





060 





A,C 


Zero 


1 


061 


1 


A,C 


One 


2 


062 


2 


A,C 


Two 


3 


063 


3 


A,C 


Three 


4 


064 


4 


A,C 


Four 


5 


065 


5 


A,C 


Five 


6 


066 


6 


A,C 


Six 


7 


067 


7 


A,C 


Seven 


.8 


070 


8 


A,C 


Eight 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




9 


071 


9 


A,C 


Nine 


: 


072 


8-2 


A,C 


Colon 


i 


073 


11-8-6 




Semicolon 


< 


074 


12-8-4 




Less than 


= 


075 


8-6 


A r C 


Equal 


> 


076 


0-8-6 




Greater than 


? 


077 


0-8-7 




Question mark 


@ 


100 


8-4 




Commercial at-sign 


A 


101 


12-1 


A,C 


Uppercase letter 


B 


102 


12-2 


A,C 


Uppercase letter 


C 


103 


12-3 


A,C 


Uppercase letter 


D 


104 


12-4 


A,C 


Uppercase letter 


E 


105 


12-5 


A,C 


Uppercase letter 


F 


106 


12-6 


A r C 


Uppercase letter 


G 


107 


12-7 


A,C 


Uppercase letter 


H 


110 


12-8 


A,C 


Uppercase letter 


I 


111 


12-9 


A,C 


Uppercase letter 


J 


112 


11-1 


A,C 


Uppercase letter 


K 


113 


11-2 


A,C 


Uppercase letter 


L 


114 


11-3 


A.C 


Uppercase letter 


M 


115 


11-4 


A,C 


Uppercase letter 


N 


116 


11-5 


A,C 


Uppercase letter 





117 


11-6 


A,C 


Uppercase letter 


P 


120 


11-7 


A,C 


Uppercase letter 


Q 


121 


11-8 


A,C 


Uppercase letter 


R 


122 


11-9 


A,C 


Uppercase letter 


S 


123 


0-2 


A,C 


Uppercase letter 


T 


124 


0-3 


A,C 


Uppercase letter 


U 


125 


0-4 


A,C 


Uppercase letter 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




V 


126 


0-5 


A,C 


Uppercase letter 


W 


127 


0-6 


A,C 


Uppercase letter 


X 


130 


0-7 


A,C 


Uppercase letter 


Y 


131 


0-8 


A,C 


Uppercase letter 


Z 


132 


0-9 


A,C 


Uppercase letter 


[ 


133 


12-8-2 




Opening (left) bracket 


\ 


134 


0-8-2 




Reverse slant (backslash) 


] 


135 


11-8-2 




Closing (right) bracket 


^ 


136 


11-8-7 




Circumflex 


- 


137 


0-8-5 




Underline 


i 


140 


8-1 




Grave accent (single open 
quotation) 


a 


141 


12-0-1 


C 


Lowercase letter 


b 


142 


12-0-2 


C 


Lowercase letter 


c 


143 


12-0-3 


C 


Lowercase letter 


d 


144 


12-0-4 


C 


Lowercase letter 


e 


145 


12-0-5 


C 


Lowercase letter 


f 


146 


12-0-6 


C 


Lowercase letter 


g 


147 


12-0-7 


C 


Lowercase letter 


h 


150 


12-0-8 


C 


Lowercase letter 


i 


151 


12-0-9 


C 


Lowercase letter 


J 


152 


12-11-1 


C 


Lowercase letter 


k 


153 


12-11-2 


C 


Lowercase letter 


1 


154 


12-11-3 


C 


Lowercase letter 


m 


155 


12-11-4 


C 


Lowercase letter 


n 


156 


12-11-5 


C 


Lowercase letter 


o 


157 


12-11-6 


C 


Lowercase letter 


P 


160 


12-11-7 


C 


Lowercase letter 


q 


161 


12-11-8 


C 


Lowercase letter 


r 


162 


12-11-9 


C 


Lowercase letter 
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ASCII 


ASCII 


FORTRAN 




CHARACTER 


OCTAL 


PUNCHED-CARD 


(A=ANSI) 


DESCRIPTION 




CODE 


CODE 


(C=CRAY) 




s 


163 


11-0-2 


C 


Lowercase letter 


t 


164 


11-0-3 


C 


Lowercase letter 


u 


165 


11-0-4 


c 


Lowercase letter 


V 


166 


11-0-5 


c 


Lowercase letter 


w 


167 


11-0-6 


c 


Lowercase letter 


X 


170 


11-0-7 


c 


Lowercase letter 


y 


171 


11-0-8 


c 


Lowercase letter 


z 


172 


11-0-9 


c 


Lowercase letter 


1 


173 


12-0 




Opening (left) brace 


1 
1 


174 


12-11 




Vertical line 


) 


175 


11-0 




Closing (right) brace 


% 


176 


11-0-1 




Over line (tilde, general 
accent) 


DEL 


177 


12-9-7 




Delete 
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EXCHANGE PACKAGES 



An Exchange Package is a 16-word block of data in memory that is 
associated with a particular computer program. An Exchange Package 
contains the basic hardware parameters necessary to provide continuity 
from one execution interval for the program to the next. The CRAY-1 
Exchange Package is illustrated in figure D-l; the CRAY X-MP Exchange 
Package is illustrated in figure C-2. 
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Figure D-l. CRAY-1 Exchange Package 



Field 



Word 



Bits 



Error type (E) 











0-1 


Syndrome bits (S) 











2-9 


Read mode (R) 











10-11 


Bank error address (B) 











12-15 


Program register (P) 











16-39 


Chip error address (C) 








1 


0-15 


Base address (BA) 








1 


18-35 


Interrupt Monitor Mode bit (IMM) 




1 


39 


High-order bits of memory error 


read 






address (RH) 








2 


14-15 


Limit address (LA) 








2 


18-35 


Mode bits (M) 








2 


36-39 


Exchange address (XA) 








3 


16-23 


Vector length (VL) 








3 


24-30 


Flag register (F) 








3 


31-39 


Current contents of the 


eight 


A 


registers 


0-7 


40-63 


Current contents of the 


eight 


S 


registers 


8-15 


0-63 
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PN-nj 
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A6 
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SO 
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Figure D-2. CRAY X-MP Exchange Package 



Field 



Word 



Bits 







4-Processor 


Single-Processor 


Dual-Processor 







CRAY X-MP 
0-1 


CRAY : 


X-MP 


CRAY X-MP 


Processor number (PN) 


1 




1 


Error type (E) 





2-3 




2-3 




2-3 


Syndrome bits (S) 





4-11 




4-11 




4-11 


Program Address 














register (P) 





16-39 




16-39 




16-39 


Read mode (R) 


1 


0-1 




0-1 




0-1 


Read address (CSB) 


1 


2-5 


(CS) | 


2-4 


(CS) ; 


2-6 (CS) 






6-11 


(B) 


7-11 


(B) 


7-11 (B) 



Instruction Base 

Address (IBA) 
Instruction Limit 



16-33 



18-34 



Address (ILA) 


2 


16-33 


18-34 


Mode register (M) 


1 


35-39 


35-37 




2 


35-39 


35-39 


Vector not used (VNU) 


2 








Enable Second Vector 








Logical (ESVL) f 


3 








Flag register (F) 


3 


14-15; 


15; 






31-39 


31-39 


Exchange Address 








register (XA) 


3 


16-23 


16-23 


Vector Length 


3 


24-30 


24-30 


register (VL) 









3Q 



18-34 

18-34 
35-39 
35-39 




14-15 ; 
31-39 

16-23 
24-30 



t Not available on all CRAY X-MPs 
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Field Word Bits 



Enhanced Addressing 

Mode (EAM) f 4 

Data Base Address (DBA) 4 
Program State (PS) 4 
Cluster Number (CLN) 4 
Data Limit 5 

Address (DLA) 
Eight A register 0-7 

contents 
Eight S register 8-15 

contents 



4-Processor 


Single-Processor 


Dual-Processor 


X-MP 


X-MP 


X-MP 





NA 


NA 


16-33 


18-34 


18-34 


35 


35 


35 


37-39 


38-39 


38-39 


16-33 


18-34 


18-34 


40-63 


40-63 


40-63 


0-63 


0-63 


0-63 



t 4-processor CRAY X-MP only 
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ERROR AND STATUS CODES 



SYSTEM ERROR CODES 

Table E-l describes the system error codes as released. Installation 
differences can change data in this table. Consult the on-site analyst 
for details. The CRAY-OS Message Manual, publication SR-0039, also 
contains additional descriptions of the abort codes and their 
corresponding messages. 



Table E-l. Error codes for reprieve processing 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non- fatal 


Mask Value) 


Description 


AB001 


NF 


4 


End-of-file on read 


AB002 


NF 


4 


Invalid LOCK or UNLOCK indicator 


AB003 


F 


4 


Device Allocation Table exhausted 


AB004 


NF 


4 


Dataset not open 


AB005 


NF 


4 


Invalid dataset open request 


AB006 


NF 


4 


No read permission 


AB007 


NF 


4 


No write permission 


AB008 


NF 


4 


Illegal bit set in RFL request word 


AB009 


NF 


4 


Attempt to delete memory outside 
program area 


AB010 


F 


400 


No available disk space 


AB011 


F 


4000 


System directory is full 


AB012 


NF 


4 


Job Table Area (JTA) overflow 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB013 


NF 


4 


More memory requested than 
available 


AB014 


NF 


4 


More memory requested than allowed 


AB015 


NF 


2000 


Unknown acquire error 


AB016 


NF 


2000 


Subdataset $IN cannot be disposed 


ABO 17 


NF 


4 


Invalid dataset close request 


AB018 


NF 


4 


Dataset already opened 


ABO 19 


NOT RE 


PRIEVABLE 


Job Communication Block destroyed 


AB020 


NF 


4 


Invalid system request parameter 


AB021 


NF 


4 


Dataset not found 


AB022 


NF 


4 


Invalid program load dataset 


AB023 


F 


200 


Job time limit exceeded 


AB024 


F 


10 


Operator dropped user job 


AB025 


NF 


2 


User program requested abort 


AB026 


NF 


4 


Invalid (undefined) user request 


ABO 2 7 


NF 


4 


Call not between user BA and LA 


AB028*" 


NF 




XP errors (no message) 


AB029 


NF 


4 


Logical device name not found 


AB030 


NF 


4 


Block number error 


AB031 


NF 


4 


Unrecoverable data error 



t The AB028 error code is set during abort processing when any Exchange 
Package error flag is set. It does not represent a single reprievable 
condition. One of the Exchange Package error codes (AB053 through 
AB058) will be set later to indicate the appropriate error. 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB032 


NF 


4 


Unrecoverable hardware error 


AB033 


NF 


4 


Read after write or after EOD 


AB034 


NF 


4 


Unknown error 


ABO 3 5 


NF 


4 


Invalid processing direction 


AB036 


NF 


4 


Dataset prematurely terminated 


ABO 3 7 


NF 


4 


Dataset Parameter Table invalid 


AB038 


NOT RE 


PRIEVABLE 


Operator killed user job 


ABO 3 9 


NF 


20 


Operator reran the job 


AB040 


NF 


4 


Invalid disposition code 


ABO 4 3 


F 


400 


Allowable user log size exceeded 


AB044 


NF 


4 


Invalid dataset name 


AB045 


NF 


400 


Specified LM is too big 


AB046 


NF 


400 


Dataset size limit exceeded 


ABO 4 7 


NF 


2000 


Dataset not available from station 


AB048 


NF 


2000 


Dataset cannot be saved on a front 
end 


AB049 


NF 


4 


Invalid LFTs in user area 


AB051 


F 


4 


Invalid pointer to first JTA LFT 


AB052 


NF 


4 


No user LFT DN matches JTA LFT 


ABO 5 3 


NF 


100 


Floating-point error 


AB054 


NF 


4 


Operand range error 


AB055 


NF 


4 


Program range error 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB056 


NF 


40 


Uncorrected memory error 


AB057 


NOT RE 


PRIEVABLE 


Interactive ABORT 


AB058 


F 


4 


Error exit 


AB061 


NF 


4 


No invoke request provided 


AB062 


NF 


4 


Invoke request abort pending 


AB063 


NF 


4 


Invoke length not multiple of 512 


AB064 


NF 


4 


Invoke length greater than maximum 


AB066 


NF 


4 


Dataset has related disposes active 


AB067 


NF 


4 


Invalid procedure dataset 


AB068 


NF 


4 


Procedure nest level exceeded 


AB070 


NF 


10000 


ATTENTION request command was 
entered at an interactive terminal 


AB071 


NF 


4 


Bad class structure 


AB072 


NF 


4 


DSP destroyed by user 


AB073 


NF 


4 


Undefined function code in F$INS 


AB074 


NF 


4000 


DUMPJOB processing has been 
inhibited 


AB075 


NF 


4000 


No permissions granted while 
dataset is execute-only 


AB076 


NF 


4 


Dataset is already accessed by the 
job 


AB077 


NOT RE 


PRIEVABLE 


CSP internal error 


AB078 


NF 


4000 


Privileged system request 


AB079 


NF 


4 


Unassigned JCL symbol 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB080 


NF 


4 


Receive buffer too small 


AB081 


NF 


4 


Undefined JCL symbol 


AB082 


NF 


4 


JCL symbol cannot be modified 


AB083 


NF 


4 


Invalid message class 


AB100 


NF 


4 


Nonsequential write for tape 
dataset 


AB101 


NF 


4 


Interchange and unblocked are 
mutually exclusive 


AB102 


NF 


4 


Tape dataset can not be disposed 


AB103 


NF 


4 


VOL parameter must be equated for 
OLD dataset 


AB104 


NF 


4 


Job has requested more devices 
than it has allocated 


AB105 


NF 


4 


The Label Definition Table has 
been omitted for a labeled tape 
dataset 


AB106 


NF 


4 


The LDT has a bad field 


AB107 


NF 


4 


Unable to write trailer label group 


AB108 


NF 


4 


Write attempted on protected volume 


AB109 


NF 


4 


Attempt to write tape block larger 
than MBS 


AB110 


NF 


4 


Write protocol error 


AB111 


NF 


4 


Tape went off the end of the reel 


AB112 


NF 


4 


Volume is security protected 


AB113 


NF 


4 


Dataset is security protected 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB114 


NF 


4 


Read attempted of NEW dataset 


AB115 


NF 


4 


Dataset not on this volume 


AB116 


NF 


4 


File section does not exist 


AB117 


NF 


4 


Ill-formed LDT 


AB118 


NF 


4 


Label group corrupted 


AB119 


NF 


4 


Deferred tape feature 


AB120 


NF 


4 


No HDR1 in label group 


AB121 


NF 


4 


Bad record format 


AB122 


NF 


4 


Bad blocking attributes 


AB123 


NF 


4 


Bad record length 


AB124 


NF 


4 


Bad block Length 


AB125 


NF 


4 


Bad buffer offset 


AB126 


NF 


4 


Bad owner ID 


AB127 


NF 


4 


Incomplete VSN list 


AB128 


NF 


4 


Read of expired dataset 


AB129 


NF 


4 


Write of nonexpired dataset 


AB130 


NF 


4 


Invalid expiration date 


AB131 


NF 


4 


Difference in volume block counts 


AB132 


NF 


4 


Label type can not be scratched 


AB133 


NF 


4 


F$POS is illegal for mass 
storage datasets 


AB134 


NF 


4 


Large block read 
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Table E-l. Error codes for reprieve processing (continued) 







Reprieve Error 




System 


Fatal/ 


Class (Octal 




Error Code 


Non-fatal 


Mask Value) 


Description 


AB135 


NF 


4 


Resource not available 


AB136 


NF 


4 


Tape volume/dataset access 
denied by servicing front-end 


AB137 


NF 


4 


Tape volume/dataset access denied 
due to the lack of security checks 
servicing front end 


AB138 


NF 


4 


Tape dataset has already been 
cataloged. 


AB139 


NF 


4 


Tape dataset does not reside in 
servicing front-end catalog. 


AB140 


NF 


4 


Update of dataset/volume state to 
servicing front end failed 


AB141 


NF 


4 


The tape device has been closed to 
user I/O. 


AB142 


NF 


4 


Tape volume does not reside in 
servicing front-ends catalog. 


AB143 


NF 


4 


Tape volume mount canceled by 
operator 


AB144 


NF 


4 


Maximum block size exceeded on 
write of tape dataset 


AB173 


NF 


4 


Interjob connections were open at 
the time of a job step advance 


AB179 


NF 


4 


DSP IN/OUT pointer not on a block 
boundary for WRITE/READ 


AB180 


NF 


4 


DSP buffer pointers overlap 
LFT/DSP area 


AB181 


NF 


4 


DSP LIMIT pointer less than FIRST 


AB182 


NF 


4 


DSP in pointer not between FIRST 
and LIMIT 
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Table E-l. Error codes for reprieve processing (continued) 



System 
Error Code 


Fatal/ 
Non-fatal 


Reprieve Error 
Class (Octal 
Mask Value) 


Description 


AB183 


NF 


4 


DSP out pointer not between FIRST 
and LIMIT 


AB184 


NF 


4 


DSP FIRST pointer out of bounds 


AB185 


NF 


4 


DSP LIMIT pointer out of bounds 


AB186 


NF 


4 


DSP RCW pointer not between FIRST 
and LIMIT 


AB187 


NF 


4 


Buffered I/O record address out of 
bounds 


AB188 


NF 


4 


Unknown buffer I/O function 


AB189 


NF 


4 


Buffer length not multiple of D'152 


AB190 


NF 


4 


Uncleared error in DSP 


AB191 


NF 


4 


Attempt to start I/O on busy 
dataset 


AB192 


NF 


4 


DSP save words destroyed by user 


AB193 


NF 


4 


All user tasks deactivated 


AB194 


NF 


4 


User deadlock detected 


AB195 


NF 


4 


Attempt to deactivate an inactive 
task 


AB196 


NF 


4 


Attempt to activate an active task 


AB197 


NF 


4 


User task attempt to activate 
itself 


AB198 


NF 


4 


Invalid user task ID 


AB199 


NF 


4 


Maximum user tasks per job exceeded 
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PERMANENT DATASET STATUS CODES 

The permanent dataset status octal codes are placed in the PMST field of 
the Permanent Dataset Definition Table (PDD) which is presented in 
Appendix A. PMST can also be tested as the JCL symbol PDMST (see table 
16-1). The PDD statuses are listed in table E-2. The logfile contains a 
corresponding code (of the form PDnnn, where nnn is listed in table 
E-2) and message for most of the status conditions. 



Table E-2. PDD status 



Logfile 








Code 


PMST 


Status 






1 


Complete; no error. 




1 


11 


No DNT found for the specified dataset 




2 


21 


Maintenance permission not granted 




3 


31 


Edition already exists 




4 


41 


DSC full 




5 


51 


Function code out of range 




6 


61 


The local dataset name (DN) specified is already 
use by the job 


in 


7 


71 


No permission granted 






101 


Delay and try again 




9 


111 


Requested dataset not in DSC 




10 


121 


Edition does not exist 




11 


131 


Active PDS full 




12 


141 


Dataset not permanent 




13 


151 


Unused 




14 


161 


Continuation error 




15 


171 


DAT full 
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Table E-2. PDD status (continued) 



Log file 






Code 


PMST 


Status 


16 


201 


DNT full 




211 


End of DSC 


18 


221 


Specified permanent dataset already accessed by this 
job 




231 


Request to read zero pages 




241 


Invalid page number requested 


21 


251 


No data has been written to disk 




261 


SDT does not exist 




271 


SDT entry not on input or output queue 




301 


Unable to queue SDT entry 


25 


311 


Dataset name in PDD is 


26 


321 


Access control word validation error 


27 


331 


Notes length exceeds allowable maximum 


28 


341 


Unique access is not acceptable because the dataset 
is part of the System Directory. 


29 


351 


Text length is zero. 


30 


361 


The text length specified exceeds the allowable 
maximum. 


31 


371 


The device on which all or part of the dataset 
resides is down. 




401 


Error occurred while rewriting the SDT, or the SDT 
name and dataset type in the DSC do not match those 
in the PDD. 




411 


Permanent dataset to be pseudo accessed is not 
available or the DAT in the DSC does not match the 
JTA DAT. 
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Table E-2. PDD status (continued) 



Log file 






Code 


PMST 


Status 


34 


421 


Access is denied because crossed allocation unit 
exists. 


35 


431 


The dataset is already permanent. 


36 


441 


The DSC entry was flagged by Startup as containing a 
fatal error; access is denied. 




451 


The DSC or DXT page buffer supplied is outside the 
user field length. 




461 


No available QDT entries exist 




471 


The dataset has outstanding disposes; do not 
deallocate disk space. 


40 


501 


Allocation of multitype dataset inconsistent with 
related datasets 


41 


511 


Multitype dataset has nonexistent QDT entry. 


42 


521 


Maximum edition reached 


43 


531 


Dataset is on an active SDT queue 


44 


541 


Bad SDT address on Enqueue SDT request 


45 


551 


Dataset is on a scratch device 


46 


561 


Access denied due to DXT error 


47 


571 


Notes length is zero. 


48 


601 


Unused 


49 


611 


Maximum number of DXT entries per dataset reached 


50 


621 


Attributes dataset not local 


51 


631 


Attributes dataset not permanent 


52 


641 


Invalid notes buffer specified 
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Table E-2. PDD status (continued) 



Log file 
Code 


PMST 


Status 


53 


651 


Invalid text buffer specified 


54 


661 


Specified permit entry not found 




671 


Invalid DXT buffer address (get/link DXT) 




701 


Bad DXT linkage pointer (get/link DXT) 




711 


PMPDN and DCPDN do not match (get/link DXT) 




721 


Unused 




731 


PMSIZE greater than maximum PDD size 




2001 


Parameter error (internal to $SYSLIB) 




2002-2777 


This range of status codes is reserved for magnetic 
tape support 
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GLOSSARY 



GLOSSARY 



Abort - To terminate a program or job when a condition (hardware or 
software) exists from which the program or computer cannot recover. 

Absolute address - (1) An address permanently assigned by the machine 
designator to a storage location, (2) A pattern of characters that 
identifies a unique storage location without further modification. 
Synonymous with machine address. 

Absolute block - Loader tables consisting of the image of a program in 
memory. The program image can be saved on a dataset for subsequent 
reloading and execution. 

Address - (i) An identification, as represented by a name, label, or 
number, for a register, location in storage, or any other data source or 
destination such as the location of a station in a communication 
network. (2) Any part of an instruction that specifies the location of 
an operand for the instruction. 

Allocate - To reserve an amount of some resource in a computing system 
for a specific purpose (usually refers to a data storage medium) . 

Alphabetic - A character set including, $, %, @, as well as the 26 
uppercase letters A through Z. 

Alphanumeric - A character set including all alphabetic characters and 
the digits through 9. 

Arithmetic operator - Part of an expression that indicates action to be 
performed during evaluation of expression; can be symbolic character 
representing addition, unary plus, subtraction, unary minus, 
multiplication, or division. 

Assemble - To prepare an object language program from a symbolic language 
program by substituting machine operation codes for symbolic operation 
codes and absolute or relocatable addresses for symbolic instructions. 



B 

Base address - The starting absolute address of the memory field length 
assigned to the user's job. This address is maintained in the Base 
Address (BA) register. The base address must be a multiple of 20 g . 
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$BLD - A dataset on which load modules are placed by a compiler or 
assembler unless the user designates some other dataset. 

Blank common block - A common block where data cannot be stored at load 
time. The first declaration need not be the largest. The blank common 
block is allocated after all other blocks have been processed. 

Block - (1) A tape block is a collection of characters written or read as 
a unit. Blocks are separated by an interblock gap and can be from 1 
through 1,048,576 bytes. A tape block and a physical record are 
synonymous on magnetic tape. (2) In COS blocked format, a block is a 
fixed number of contiguous characters with a block control word as the 
first word of the block. The internal block size for the Cray mainframe 
is 512 words (one sector on disk) . In COS manuals, the terms tape block 
and 512-word block are consistently used to distinguish between the two 
uses. 

Block control word - A word occurring at the beginning of each block in 
the COS blocked format that identifies the sequential position of the 
block in the dataset and points forward to the next block control word. 

BOT - Beg inning -of -tape; the position of the beg inning -of -tape reflective 
marker. 

BOV - Beginning-of-volume. See BOT. 

BPI - Bits per inch. COS supports the 1600 and 6250 bpi recording 
densities. 

Buffer - A storage device used to compensate for the difference in rate 
of flow of data, or time of occurrence of events, when transmitting data 
from one device to another. It is normally a block of memory used by the 
system to transmit data from one place to another. Buffers are usually 
associated with the I/O subsystem. 

Buffer Memory - A 64-bit memory in the I/O Subsystem common to all I/O 
Processors . 



Call - The transfer of control to a specified routine. The called 
routine normally transfers control back to the caller after the called 
routine has finished its task. 

Card image - A one-to-one representation of the contents of a punched 
card, for example, a matrix where a 1 represents a punch and a 
represents the absence of a punch. In COS blocked format, each card 
image is a record. 

Catalog (noun) - A list or table of items with descriptive data, usually 
arranged so that a specific kind of information can be readily located. 
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Channel - A path along which signals can be sent. 

Character - A logical unit composed of bits representing alphabetic, 
numeric, and special symbols. The Cray software processes 8-bit 
characters in the ASCII character set. 

Code - (1) A system of character and rules representing information in a 
form understandable by a computer. (2) Translation of a problem into a 
computer language. 

Common block - A block that can be declared by more than one program 
module during a load operation. More than one program module can specify 
data for a common block but if a conflict occurs, information from later 
programs is loaded over previously loaded information. A program can 
declare no common blocks or as many as 125 common blocks. The two types 
of common blocks are labeled and blank. 

Conditional control statement block - Defines the conditions under which 
a group of control statements are to be processed. The statements which 
define the block and conditions are: IP, ELSE, ELSEIF, ENDIF, and EXITIF. 

Control statement - The format, consisting of a verb and its parameters, 
used to control the operating system and access its products. Directives 
are used to control products. 

Control statement input file - A dataset containing valid control 
statements as its first file. 

Controlled device - One of one or more devices or resources which are 
allocated to jobs on the basis of resource limits and requests. 

COS - The Cray Operating System described in this manual. 

$CS - A primary control statement input file. 

CSP - The Control Statement Processor (CSP) is a system program that 
executes in the user field. CSP initiates the job, analyzes, and stores 
the various elements of the control statements (that is, cracks them) , 
processes system verbs, advances the job step by step, processes errors, 
and ends the job. 



D 

Data - (1) Information manipulated by or produced by a computer program. 
(2) Empirical numerical values and numerical constants used in arithmetic 
calculation. Data is considered to be that which is transformed by a 
process to produce the evidence of work. Parameters, device input, and 
working storage are considered data. 
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Dataset - A quantity of information maintained on mass storage by the 
Cray Operating System. Each dataset is identified by a symbolic name 
called a dataset name. Datasets are of two types: temporary and 
permanent. A temporary dataset is available only to the job that created 
it. A permanent dataset is available to the system and to other jobs and 
is maintained across system deadstarts. 

Dataset characteristic information - The information that describes where 
the dataset resides, how large it is, its permanent name, edition number, 
information about the creating job, etc. 

Dataset name verb - A verb that is the name of a dataset. See local or 
system dataset name verb. 

Deadstart - The process by which an inactive machine is brought up to an 
operational condition ready to process jobs. 

Debug - To detect, locate, and remove mistakes from a routine or 
malfunction of a computer. Synonymous with troubleshoot. 

DEC - Disk Error Correction, a task within the STP portion of COS. DEC 
can be called by the Disk Queue Manager (DOM) to attempt correction of a 
disk error. 

Delimiter - A character that separates items in a control statement or a 
directive; synonymous with separator. 

Density - See tape density. 

Device - A piece of equipment that mechanically contains and drives a 
recording medium. 

Directive - A command used to control a product, such as UPDATE. 

Diagnostic - (1) Pertaining to the detection and isolation of a 
malfunction or a mistake. (2) A message printed when an assembler or 
compiler detects a program error. 

Disposition code - A code used in I/O processing to indicate the 
disposition to be made of a dataset when its corresponding job is 
terminated or the dataset is released. 

DQM - The Disk Queue Manager is a task within the STP portion of COS. 
DQM controls the simultaneous operation of disk storage units on CPU I/O 
channels or on the I/O Subsystem. 

Dump - (1) To copy the contents of all or part of a storage device, 
usually from internal storage, at a given instant of time. (2) The 
process of performing (1) . (3) The document resulting from (1) . 
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End-of-data delimiter - Indicates the end of a dataset. In COS blocked 
format, this is a record control word with a 173 in the mode field. 

End-of-file delimiter - Indicates the end of a file. (1) In COS blocked 
format, this is a record control word with a 163 in the mode field. 
(2) On magnetic tape, this is a tapemark. 

End-of-record delimiter - Indicates the end of a record. (1) In COS 
blocked format, this is a record control word with a 10s in the mode 
field. (2) In an ASCII punched deck, this is indicated by the end of 
each card. 

Entry point - A location within a block that can be referenced from 
program blocks that do not declare the block. Each entry point has a 
unique name associated with it. The loader is given a list of entry 
points in a loader table. A block can contain any number of entry points 

An entry point name must be 1 to 8 characters and cannot contain the 
characters blank, asterisk, or slash. Some language processors (for 
example, FORTRAN) can produce entry point names under more restricted 
formats due to their own requirements. 

EOD - End-of-data on tape. The definition of EOD is a function of 
whether the tape is labeled or nonlabeled and of the type of operation 
being performed (input or output). When reading a labeled tape, EOD is 
returned to the user when an EOF1 trailer label is encountered. When 
reading a nonlabeled tape, EOD is returned when a tapemark is read on the 
last volume in the volume list for a particular dataset. When writing a 
labeled or nonlabeled tape, EOD processing is initiated by a write EOD, 
rewind, close, or release request. 

EOF - End-of-file on tape, sometimes used to mean end of tape trailer 
group. 

EOI - End-of-information; see EOD. 

EOT - End-of-tape; a status, set only on a write operation indicating 
sensing of the end of the tape reflective marker. 

EOV - End-of-volume . On output, EOV occurs when end-of-tape status is 
returned on a write operation. This status occurs when the EOT 
reflective marker is sensed by the tape device. For input of a labeled 
tape dataset, EOV occurs when an EOV1 trailer label is read; for input of 
a nonlabeled dataset, EOV is returned when a tapemark is encountered and 
the volume list is not exhausted. 

Exchange Package - A 16-word block of data in memory which is associated 
with a particular computer program or memory field. It contains the 
basic parameters necessary to provide continuity from one execution 
interval for the program to the next. 
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EXEC - The COS System Executive (EXEC) is the control center for the 
operating system. It alone accesses all of memory, controls the I/O 
channels, and selects the next program to execute. 

EXP - The User Exchange Processor (EXP or UEP) is a task within the STP 
portion of COS. The Exchange Processor task processes all user system 
action requests and user error exits. The Exchange Processor also 
handles certain requests from the Job Scheduler (JSH) to initiate or 
abort a job. 

Expression (JCL parameter expression) - A series of characters grouped 
into operands and operators which are computed as one value during 
parameter evaluation; should be delimited by parentheses. 

External reference - A reference in one program block to an entry point 
in a block not declared by that program. Throughout the loading process, 
externals are matched to entry points (this is also referred to as 
satisfying externals) ; that is, addresses referencing externals are 
supplied with the correct address. 



File - A collection of records in a dataset. In COS blocked format, a 
file is terminated by a record control word with I63 in the mode field. 

Filemark - See to tapemark. 

Foreign label - A special condition that can occur during the label scan 
at the beginning of a tape. If a NOT CAPABLE status is returned on a BOV 
label scan, TQM declares the tape to be foreign labeled (FRN) which 
protects a 7-track tape or a 9-track, 800 bpi tape from being accidently 
destroyed . 

Formal parameter specifications - Parameters in a procedure definition 
which identify the character strings within the procedure body that can 

*-**i UUWaWil.Ul.CU MULXJiV) bliC J/i.UV,CUULC O CVQJ.UaV.XVUl 

Front-end dataset servicing - The act of requesting and receiving 
information concerning a particular dataset that is known to the 
front-end computer system. Typical servicing is: 

• Direct operator messages concerning tape volume/drive activity, 

• Obtaining required information concerning a dataset, such as 
what volumes it resides on, the expiration date of each volume, 
access permissions, etc., and 

• Updating information for a dataset and/or tape volume for use by 
that computer system. 
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Front-end processor - A computer connected to a Cray Computer System 
channel. The front-end processor supplies data and jobs to the Cray 
mainframe and processes or distributes the output from the jobs. 
Front-end systems are also referred to as stations in Cray publications. 



Generic resource - A device or group of devices connected to the Cray 
system which is accessible to user jobs. Devices which constitute a 
generic resource are characterized by common attributes, such as tape 
drives with 6250 bpi capability. These devices are subject to regulated 
access by the system. 



Heap - An area of memory within the user field managed by user-callable 
library routines. The heap provides dynamic storage allocation for a 
single job. 

HLM - High limit of memory, the highest relative memory address available 
to the user for program and data area. 



$IN - A dataset containing the job control language statements as well as 
the source input and data for compilers and assemblers, unless the user 
designates some other dataset (FT05 for example) . 

In-line procedure - A procedure defined in a control statement file. 

Input/Output - (1) Commonly called I/O. To communicate from external 
equipment to the computer and vice versa. (2) The data involved in such 
a communication. (3) Equipment used to communicate with a computer. (4) 
The media carrying the data for input/output. 

Integer constant - Specifies an octal value or a decimal value that can 
be signed as positive or negative. 
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Interchange format - One of the two ways in which tape datasets can be 
read or written. Each tape block of data corresponds to a single logical 
record in COS blocked format. Interchange format is selected by setting 
DF=IC when a tape dataset is accessed. As far as I/O routines in the 
Cray mainframe are concerned, interchange datasets must be in COS blocked 
format because the COS blocked structure (BCWs and RCWs) is used to 
describe each tape block read or written. This blocked structure allows 
the user to write or read variable-length tape blocks at high speed with 
data resolution to the 8-bit byte level Of the tape device. The record 
control word (RCW) is used to define the tape block length on output and 
to describe the block length on input. No BCW or RCW ever appears in the 
data written on the tape. 

Interblock gaps - The physical separation between successive tape blocks 
on magnetic tape. 

I/O Subsystem - Part of a CRAY-1 S Series Model S/1200 through S/4400, 
all models of the CRAY-1 M Series and CRAY X-MP Computer Systems 
consisting of two to four I/O processors and one-half, one, four, or 
eight million words of shared Buffer Memory. The optional tape subsystem 
is composed of at least one block multiplexer channel, one tape 
controller, and two tape units. The tape units supported are 
IBM-compatible 9-track, 200 ips, 1600/6250 bpi devices. 

Iterative control statement block - Defines the repeated execution of a 
series of statements if a condition is satisfied. 



JCL block control statement - A statement in the control statement file 
that is part of a group of control statements called a block which 
specifies an action to be taken by COS; the three types of blocks are: 
procedure defintion, conditional, and iterative. 



JCM - The Job Class Monitor is a task within the STP portion of COS. JCM 
assigns every job to a job 
it enters the input queue. 



assigns evety job to a job class (see JOB statement description) befoj.6 



Job - (1) An arbitrarily defined parcel of work submitted to a computing 
system. (2) A collection of tasks submitted to the system and treated by 
the system as an entity. A job is presented to the system as a formatted 
dataset. With respect to a job, the system is parametrically controlled 
by the content of the job dataset. 

Job Communication Block - The first 2008 words of the job memory 
field. This area is used to hold the current control statement and 
certain job-related parameters. The area is accessible to the user, the 
operating system, and the loader for inter-phase job communication. 
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Job control statement - Any of the statements used to direct the 
operating system in its functioning, as compared to data, programs, or 
other information needed to process a job but not intended directly for 
the operating system itself. A control statement can be expressed in 
card, card image, or user terminal keyboard entry medium. 

Job deck - The physical representation of a job before processing either 
as a deck of cards or as a group of records. The first file of the job 
dataset contains the job statements and the job parameters which will be 
used to control the job. Following files contain the program and data 
which the job will require for the various job control statements. The 
job deck is terminated by an end-of-data delimiter. 

Job input dataset - A dataset named $IN on which the card images of the 
job deck are maintained. This consists of programs and data referenced 
by various job steps. The user can manipulate the dataset like any other 
dataset (excluding write operations) . 

Job output dataset - Any of a set of datasets recognized by the system by 
a special dataset name (for example, $OUT, $PLOT, and $PUNCH) , which 
becomes a system permanent dataset at job end and is automatically staged 
to a front-end computer for processing. 

Job step - A unit of work within a job, such as source language 
compilation or object program execution. 

JSH - The Job Scheduler (JSH) is a task within the STP portion of COS. 
The Job Scheduler task initiates the processing of a job, selects the 
currently active job, manages job roll-in and roll-out, and terminates a 
job. 



K 

Keyword parameter - A string of 1 to 8 alphanumeric characters that 
consists of a keyword followed by one or more values; identified by its 
form rather than by its position in the control statement. 



L 

$LOG - See logfile. 

Label group - A group of tables that precede and follow the user data at 
dataset and/or volume boundary conditions. The label group describes the 
characteristics of the volume or dataset. 

Labeled common - A common block into which data can be stored at load 
time. 
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Library - A dataset composed of sequentially organized records and 
files. The last file of the library contains a library directory. The 
rest of the files and records, known as entries, can consist of processed 
procedure definitions and/or relocatable modules. The directory gives a 
listing of entry names with their associated characteristics. 

Library-defined verb - A 1- through 8-character name of a program or 
procedure definition residing in a library that is a part of the current 
library searchlist. 

Limit address - The upper address of a memory field. This address is 
maintained in the limit address (LA) register. 

Literal - A symbol which names, describes, or defines itself and not 
something else that it might represent. 

Literal constant - A string of 1 through 8 characters delimited with 
apostrophes whose ordinal numbers are in the range 040g through 176s; 
value of a character constant corresponds to the ASCII character codes 
positioned within a 64-bit word; alignment indicated can be left- or 
right-adjusted and zero-filled or left-adjusted and space-filled; 
apostrophes remain as part of value. 

Literal string - A string delimited with apostrophes which are normally 
not treated as part of the value, except with JCL block control 
statements which treat the apostrophes as part of the string value. 

Loader tables - The form in which code is presented to the loader. 
Loader tables are generated by compilers and assemblers according to 
loader requirements. The tables contain information required for loading 
such as type of code, names, types and lengths bf storage blocks, data to 
be stored, etc. 

Loading - The placement of instructions and data into memory so that it 
is ready for execution. Loader input is obtained from one or more 
datasets and/or libraries. Upon completion of loading, execution of the 
program in the job's memory field is optionally initiated. Loading can 
also involve the performance of load-related services such as generation 
of a loader map, presetting of unused memory to a user-specified value, 
and generation of overlays. 

Load point - See BOT. 

Local dataset - A temporary or permanent dataset accessible by the user. 

Local dataset name verb - A verb that is the name of a local dataset 
consisting of an alphabetic character followed by 1 through 6 
alphanumeric characters. Requests that COS load and execute an absolute 
binary program from the first record of the named dataset. 
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Log file - During the processing of the job, a special dataset named $LOG 
is maintained. At job termination, this dataset is appended to the $OUT 
file for the job. The job logfile serves as a time-ordered record of the 
activities of the job: all control statements processed by the job, 
significant information such as dataset usage, all operator interactions 
with a job, and errors detected during processing of the job. 

Logical operator - Represents logical function performed on operands on a 
bit-by-bit basis, returning a 64-bit result; functions are: inclusive 
OR, intersection, exclusive OR, unary complement. 



M 

Macro instruction - An instruction in a source language that is 
equivalent to a specified sequence of machine instructions. 

Magnetic tape - A tape with a magnetic surface on which data can be 
stored by selective polarization of portions of that surface. 

Mainframe - The central processor of the computer system. It contains 
the arithmetic unit and special register groups. It does not include 
input, output, or peripheral units and usually does not include internal 
storage. Synonymous with central processing unit (CPU) . 

Mass storage - The storage of a large amount of data that is also readily 
accessible to the central processing unit of a computer. 

MEP - The Error Message Processor (MEP) is a task within the STP portion 
of COS. Error messages are passed from the System Executive (EXEC) to 
the Log Manager (MS6) through the Error Message Processor. 

MSG - The Log Manager (MSG) is a task within the STP portion of COS. MSG 
writes messages in the system and user log files. 

Multiprocessing - Use of several computers to logically or functionally 
divide jobs or processes; and to execute various programs or segments 
asynchronously and simultaneously. 

Multiprogramming - A technique for handling multiple routines or programs 
simultaneously by overlapping or interleaving their execution, that is, 
permitting more than one program to time-share machine components. 

Multitasking - A type of multiprocessing in which more than one task may 



be simultaneously active for a single job. 



N 

Nesting - Including a block of statements of one kind into a larger 
block of statements of the same kind, such as an iterative block within a 
larger iterative block. 



SR-0011 Glossary-11 M 



Not Capable - A tape status indicating the reel currently mounted cannot 
be read by the control unit and drive. The Not Capable status would be 
returned if an 800 bpi tape were mounted on a device that supported only 
1600 and 6250 bpi, for example. Since it is not possible to read a Not 
Capable tape to verify label type and contents, COS rejects (unloads) all 
tapes that return a Not Capable status. 



$OUT - A dataset that contains the list output from compilers and 
assemblers unless the user designates some other dataset. At job end, 
the job logfile is added to the $OUT dataset and the dataset is sent to a 
front-end computer. 

Operand - A character string in an expression that is operated on during 
evaluation; types are integer constant, literal constant, symbolic 
variable, and subexpresion. 

Operating system - (1) The executive, monitor, utility, and any other 
routines necessary for the performance of a computer system. (2) A 
resident executive program that automates certain aspects of machine 
operation, particularly as they relate to initiating and controlling the 
processing of jobs. 

Operator - A symbolic representation indicating the action to be 
performed in an expression; types are arithmetic, relational, and logical 
operators. 

Overlaying - A technique for bringing routines into memory from some 
other form of storage during processing so that several routines will 
occupy the same storage locations at different times. Overlaying is used 
when the total memory requirements for instructions exceeds the available 
memory. 

OVM - The Overlay Manager (OVM) is a part of the STP portion of COS and 
manages the use of the overlaid portion of COS itself. 



P 

$PROC - A dataset to which in-line procedure definitions are written. 

Parallel processing - Simultaneous or approximately simultaneous 
processing of jobs, job steps, programs, and parts of programs. 

Parameter - A quantity in a control statement which can be given 
different values when the control statement is used for a specific 
purpose or process. 



SR-0011 Glossary-12 M 



Parcel - A 16-bit portion of a word which is addressable for instruction 
execution but not for operand references. An instruction occupies one or 
two parcels; if it occupies two parcels, they can be in separate words. 

Parenthetic string - A string delimited with parentheses instead of 
apostrophes; parentheses are treated as part of the string when evaluated 
except when preceded by an initial, parameter, equivalence, or 
concatenation separator character. 

PPM - The Permanent Dataset Manager (PDM) is a task within the STP 
portion of COS and provides the means for creating, accessing, deleting, 
maintaining, and auditing disk-resident permanent datasets. 

Permanent dataset - A dataset known to the operating system as being 
permanent; the dataset survives deadstart. 

Positional parameter - A parameter that must appear in a precise position 
relative to the separators in the control statement. 

Procedure - A named sequence of control statements and/or data that is 
saved in a library for processing at a later time when activated by a 
call to its name by a calling statement; provides the capability of 
replacing values within the procedure with other values. 

Procedure definition - The definition of a procedure saved in a library 
to be called for processing at a later time; if defined in a job control 
statement is called an in-line procedure definition. 

Program - (1) A sequence of coded instructions that solves a problem. 
(2) To plan the procedures for solving a problem. This can involve 
analyzing the problem, preparing a flow diagram, providing details, 
developing and testing subroutines, allocating storage, specifying I/O 
formats, and incorporating a computer run into a complete data processing 
system. 

Program block - The block within a load module usually containing 
executable code. It is automatically declared for each program (though 
it can be zero-length). It is local to the module; that is, it can be 
accessed from other load modules only through use of external symbols. 
Data placed in a program block always comes from its own load module. 

Program name - Also referred to as IDENT name or deck name, the name 
contained in the loader PDT table at the beginning of each load module. 

Program library - (PL) The base dataset used by the UPDATE utility. This 
dataset consists of one or more specially formatted card image decks, 
each separated by an end-of-file. 
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Record - A group of contiguous words or characters related to each other 
by virtue of convention. A record is fixed or variable length. (1) In 
COS blocked format, a record ends with a record control word with 10s 
in the mode field. (2) In an ASCII-coded punched deck, each card is a 
record. (3) For a listable dataset, each line is a record. (4) For a 
binary load dataset, each module is a record. 

Relational operator - An operator that indicates the comparison to be 
performed between the operands in an expression (-1 for a TRUE result and 
for a FALSE result) ; types are equal, not equal, less than, greater 
than, less than or equal, and greater than or equal. 

Relative address - An address defined by its relationship to a base 
address (BA) such that the base address has a relative address of 0. 

Relocatable address - An address presented to the loader in such a form 
that it can be loaded anywhere in the memory field. A relocatable 
address is defined as being relative to the beginning address of a load 
module program block or common block. 

Relocatable module - This is the basic program unit produced by a 
compiler or assembler. CAL produces a relocatable module from source 
statements delineated by IDENT and END. In FORTRAN, the corresponding 
beginning statements are PROGRAM, SUBROUTINE, BLOCK DATA, or FUNCTION. 
The corresponding end statement is END. 

A relocatable module consists of several loader tables that define 
blocks, their contents, and address relocation information. 

Relocate - In programming, to move a routine from one portion of internal 
storage to another and to adjust the necessary address references so that 
the routine can be executed in its new location. Instruction addresses 
are modified relative to a fixed point or origin. If the instruction is 
modified using an address below the reference point, relocation is 
negative. If addresses are above the reference point, relocation is 
positive. Generally, a program is loaded using positive relocation. 



SCP - The Station Call Processor (SCP) is a task within the STP portion 
of COS and handles communications with front-end computer systems. 

Sector - A physical area on disk equivalent to 512 Cray words. In COS 
blocked format, a block is also 512 contiguous words with a block control 
word as the first word of the block. Therefore the internal block size 
for the Cray is equivalent to one Cray disk sector. This is the unit of 
data transfer between the Cray mainframe and the I/O Subsystem. 
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SPM - The System Performance Monitor (SPM) is the task within COS that 
collects and reports statistics about COS system performance. 

STG - Stager (STG) task is a subtask of SCP within the STP portion of COS 
that handles dataset transfers between the Cray mainframe and its 
front-end processors. 

STP - The System Task Processor (STP) is the main portion of the COS 
operating system and consists of tables, a set of routines called tasks, 
and some re-entrant routines common to all tasks. 

Separator - Synonym for delimiter. 

String - A sequence of characters delimited by apostrophes or parentheses 
which is taken literally as a parameter value; see literal string and 
parenthetic string. 

Subexpression - An expression that is evaluated so that its result 
becomes an operand. 

Substitution parameters - Parameters on procedure definition prototype 
statement or procedure calling statement which provide replacement values 
to be substituted during evaluation for strings flagged within the 
procedure body. 

Symbolic variable - A string of 1 to 8 alphanumeric characters, beginning 
with an alpha character that represents values maintained by COS and/or 
the user. 

System dataset name verb - A verb that is the name of a system-defined 
dataset in the System Directory Table (SDR); consists of an alphabetic 
character which can be followed by 1 through 6 alphanumeric characters. 

System logfile - A permanent dataset named $SYSTEMLOG. 

System verb - Requests that COS perform a function; consists of an 
alphabetic character which can be followed by 1 through 6 alphanumeric 
characters 



Table - A collection of data, each item being uniquely identified either 
by some label or by its relative position. 

Tape block - A group of contiguous characters recorded on and read from 
magnetic tape as a unit. 
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Tape control unit - A piece of equipment connected to a block multiplexer 
channel that provides the capability for controlling the operation of one 
or more tape devices. Up to four control units can be combined to drive 
a maximum of 16 tape devices. The control units are cross connected to 
all devices. Such a configuration is called a 4x16 (four by sixteen) . 
If one control unit were to be connected to three devices, it would be 
referred to as a 1x3 configuration. 

Tape density (bpi) - The number of bits per inch on magnetic tape. COS 
supports 6250 bpi and 1600 bpi. 

Tape format - The way tape datasets are read or written. In 
interchange format, each tape block of data corresponds to a single 
logical record in COS blocked format. In transparent format, each tape 
block is a fixed multiple of 512 words based on the density of the tape. 

Tape volume - A reel of magnetic tape. 

Tapemark - A special hardware bit configuration recorded on magnetic 
tape. It indicates the boundary between combinations of datasets and 
labels. It is sometimes called a filemark. 

Task - A subprogram or uniquely named process that can have code and data 
areas in common with other tasks of the same job. A task is a unit of 
computation that can be scheduled independently of other tasks in the 
same job step. A job step can consist of a single task, or it may 
consist of several tasks running in parallel with each other. 

Temporary dataset - A dataset which is not permanent and is available 
only to the job that created it. 

Time slice - The maximum amount of time during which the CPU can be 
assigned to a job without re-evaluation as to which job should have the 
CPU next. 

Timestamp - A 1-word binary number that represents specific date and 
time. Timestamps are expressed as the number of (nanosecond/1.024) units 
between the date/and time in question and midnight, 1 January 1973. 
Timestamps appear in machine- independent tables used by the operating 
system. 

TQM - The Tape Queue Manager (TQM) is the System Task Processor (STP) 
task that manages tape I/O between one or more user jobs and the I/O 
Subsystem. 

Track - The smallest amount of disk space which can be allocated or 
deallocated by COS. A track is equivalent to 18 sectors for DD-19, 
DD-29, Buffer Memory and Solid-state storage device. 
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Transparent format - One of two ways tape datasets are read or written. 
Each tape block is a fixed multiple of 512 words. Transparent format is 
the default tape dataset format and is designated by setting DF=TR when 
accessing a tape dataset. This format produces a fixed-length block 
dataset (16384 bytes at 1600 bpi or 32768 bytes at 6250 bpi) that can be 
a COS blocked or unblocked dataset as far as any I/O routines are 
concerned. The tape subsytem merely takes four (1600 bpi) or eight (6250 
bpi) sectors and processes them as one physical tape block. When a short 
block is read, it is considered to be EOD. 



UEP - User Exchange Processor. See EXP. 

Unit record device - A device such as a card reader, printer, or card 
punch for which each unit of data to be processed is considered a record. 

Unload - To remove a tape from ready status by rewinding beyond the load 
point. The tape is then no longer under control of the computer. 

Unsatisfied external - An external reference for which the loader has not 
yet loaded a module containing the matching entry point. 

User field - A portion of memory containing instructions and data defined 
for a specific job. Field limits are defined by the base address and the 
limit address. A program cannot execute outside of its field nor refer 
to operands outside of its field. 

User logfile - A dataset named $LOG created for a job when it is 
initiated by the Job Scheduler. 



Verb - The first nonblank field of a control statement; specifies the 
action to be taken by COS during control statement evaluation. 

Volume - A physical unit of storage media that can be dismounted from a 
storage device, for example, a reel of magnetic tape. 

Volume identifier - Up to 6 alphanumeric characters used to identify a 
physical reel of tape. On labeled tapes, the volume identifier is 
actually recorded on tape in the volume header label. Volume identifier 
is synonomous with volume serial number. 

VSN - Volume serial number. See volume identifier. 
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Word - A group of bits between boundaries imposed by the computer. Word 

size must be considered in the implementation of logical divisions such 

as character. The word size of the CRAY-1 and CRAY X-MP computers is 64 
bits. 
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SUMMARY 



SUMMARY 



This summary lists control statements in the COS job control language. 

A parameter shown in all UPPERCASE letters must be coded literally, while a 
value must be substituted for an italicized item. Braces enclose alternate 
choices. 

The column at the left margin refers to the location in this manual of 
additional information on each control statement. References in the form 1-1 
indicate a section and page in this manual. Other references are to the 
pulication numbers of CRI manuals in which you can find the control 
statements described. 
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Reference 



Control statement 



7-7 
9-5 



7-14 
10-1 

9-15 
SR-0036 

8-1 
11-8 

SR-0013 

15-1 
SR-0000 

7-10 
SR-0033 

7-16 
13-12 

SG-0094 

12-2 

12-2 



* comment text 

ACCESS, DN=<2?1,NA,ERR,MSG, IR,PDH=pdn, ID=uid, ED=<2<2,R=:P<2,W=Wt,M=mn, 

/IN I 
UQ,LE,OWN=oV,DT=dt,NEW,RING= ( 0UT ) , DEH=den,MF=feS, 

VOl^voly.vol^i . . ,vol n ,=f sec ,FSEC=f sec, LB=lb,DF=df,PROT,MBS=mbs, 

MOD , XDT=yyddd , RT=2»t , FD=fd, CV=cv , CS=cs , F=f, RF=rf , RS=rs , FSEQ=fseq . 

ACCOUNT, AC=a<3,APW=apW f NAPW=W<2pW,US=US f UPW=MpW f NUPW=WUpW. 

ACQUIRE, DU=dn,Pm=pdn f ID=uid,ED=ed,RT=rt,R=rd l Vl=vt,Vl=mn,UQ f 

TEXT=text,MF=mf, llD=tid, DF=df, omi=own,PMi=mode,M)l>i='adn ( m) , 

TA=opt,NOTES=«Ot<2S ,ERR,MSG. 

ADJUST , DN=<2 n , NA , ERR , MSG . 

APML , CPU=t ype , l=idn , L= Idn , B-bdn , E*=edn , ABORT , DEBUG , opt ions , 
LIST=rw, S=sdn, SYM=sym, T=bst, x=xdm. 

ASSIGN, DU=dn,S=size,SZ=size,mF,BS=blk,W=ldv,DT=dt,DF=df,RDM,u, 
MR,m=lm,mc=nds,C,DC=dc,BFI=bfi,h=un,FD=fd,CV=cv,CS=cs, 
F=f, RF=rf, RS=rs ,MBS=mbs . 

AUDIT, is-ldn, B=bdn, PDN=pc7w, iD=uid, us=usn, DV=dvn, sz=dsz, 

hCC=optiopt,X=mm/dd/yy: 'hhtmrntss 1 ,TCR=mm/dd/yy. % hh:mmzss % , 
TLh=mm/dd/yy: • hh:mm: ss* ,TIM=mm/dd/yy: • hhz mm: ss* ,CW=<3W, 
om=ov , LO=opt : opt : opt : opt : opt , BO=opt : opt : opt : opt . 

A\mPL,P=pdn,i=idn,i^ldn,M=mdn,B=bdn,*-m,/=c,DVI=dw,LVl=lw,JlJ=ju,DK=list, 
PM=Hst , UO=string, CM, NA, NR. 

BIND,OAL=oaZ<2«,NAL=waMr!,L=Z<itt r DEBUG=-£,NA. 

BUILD , I=tcfa , L= Wm , OBL=Ocf« , B=bdn , NBL=rtdfa , SORT , NODIR, REPLACE . 

CPLL,CPU=type,i=idn,L=ldn,B=bdn,E=edn, ABORT, DEBUG, options, LlST=nn, 
S=so>j , SYM=sym, T=bst,x=xdm. 

CALL . DU=dn [ , CNS ] . 

CFT, l-idn , L=W« , B=bdn , C=cdn , E=n ,EDN=e<iw , OK=string, OFF= string, MAXBLOCK=mb, 
TRWSC=nn , hlDS=aids , OPT= opt ion , UNROLL=r, INT= i I , ALLOC= al locat ion, 
CPU-cputype: characteristics, DEBUG, SAVEALL, ANSI . 

CHARGES , SR=opttorzs. 

COMPARE ,h=adn , B=bdn , L=ldn , DF=df ,ME=maxe , CP=cpn , CS=csn , 
CM=CWi : CW 2 , ABORT=a<3. 

CONNECT, DU=dn[,DV=dv] [,MF=m/] [,DF=df] [ ,TEXT=text] [ ,STEXT= S text] . 

COPYD , I=idn , O=odn . 

COPYF,COPYF, l=idn,o=odn,HF=n . 
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12-1 

12-3 

SM-0072 

16-28 

13-6 

9-19 
10-5 

13-9 

13-2 

13-1 

7-19 

16-3 

16-3 

16-2 

16-12 

16-28 

7-5 

16-4 

16-4 

16-12 

16-12 

10-11 

13-15 

13-17 

16-2 



COPYR, I=idn , 0=odn , m=n . 

COPYU, I=£,O=0,NS=rtS. 

CSIM, I=idn , L=ldn , T=time , SYM=sz/m 1 : sym 2 : sym 3 ,MSG=msg. 

&DATA, dn. 

DEBUG , 1= idn , o= odn, DiMP=ddn , TRACE=w , SYMS= sym, NOTSYMS= n sym, 
mxDm=dim, BLOCKS=blk , HOTBLKS=nblk , PAGES=rcp, 
COMMENTS= ' strin g • . 

DELETE, DN=dtt,NA,ERR,MSG, PARTIAL. 

DISPOSE , m=dn, sdn= sdn, DC=de, DF=df,MF=mf, SF= sf, iD=uid, tid= tid, 

ED=ed,R?!=rt,R=rd,VI=Wt,M=rrm,TEXT=text,VlhIT,UOHhIT r DEFER,liRLS. 

DSDUMP, l=idn,o=odn,DF=df, lw=rz,NW=rt, iR=«,NR=n, IF=w,NF=n, IS=w,NS=n, 
Z ,DB=db ,DSZ=S3 . 

dump , i"idn, o=odn, FWh=fwa, lwa= Iwa, JTA, NXP , V, DSP , FORMAT=/, CENTER. 

DUMP JOB. 

ECHO,ON=e2.ass 1 :.. . :olass n , OFF=o lass-^z . .. :olass n . 

ELSE. 

ELSEIF {expression) 

ENDIF. 

ENDLOOP. 

ENDPROC. 

EXIT. 

EXITIF. 

EXITIF (expression) 

EXITLOOP. 

EXITLOOP ( expression) 

FETCH, DH=dn, SDm=sdn f TEXT=text,MF=mf, TID= tid, DF=df. 

FLODUMP. 

FTREF , I=idn , L=idn , TREE=op , CB=op , ROOT=z»00t , EKD=end, LEVEL=r? , 
DIR=(2t2>,NORDER. 

IF (expression) 



SR-0011 



Summary-3 



M 



Reference 



Control statement 



7-9 

SG-0094 

13-24 

7-1 

14-1 
SG-0056 



7-20 

16-12 

7-5 

7-3 
9-16 

7-7 
7-21 
SR-0060 
11-2 

11-5 

9-20 
13-14 
16-26 
8-10 



ioarea, i 1100 * (. 

I UNLOCK I 



ISP[,MF=m/] [ ,TEXT=text] [,STEXT=S*0X*] . 
ITEMIZE, DN=d>7,L=0cfa,NREW,NF=«,T,BL,E,B,X. 

JOB , JN= jn , MFL=/l , T= t 1 , P=p , US=us , OLM=o Im, CL-j en , gn=nr . 

LDR,DN=dr^ / LIB=l<iw / NOLIB=Ww,LLD,AB=adr^ / MAP=op r SID[= , string 1 ] , 
T-tra , NX , DEB=4 , C=oom, OVL=dir,CHS , NA, USA, L=ldn , 
SET=yal,E=rz,I=S<i£r,NOECHO, SECURE, 
GRANT=sc?i: S0 2 i • . . :s<?„,BC=i><3,PAD=pac£,NORED, 
STK [^initial size [ : increment] ] ,MM[=initial size [ : increment] ] , 

/AFTER I 
MMEPS=epst2.OW,MMLOC=| BEF 0REJ . 

LIBRARY ,DH=dn 1 idn 2 . . . :rfn 64 ,V. 

LOOP. 



MEMORY [ ,FL=/ Z] f(, USER fl • 
LI AUTO) J 



MODE , Fl=option , BT=option , ORl=option , EMh=option , AVL=option . 

MODIFY, DH=dn, PDH=pdn, iD=uid, ED=ed, RT=rt,R=rd, w=wt,M=rnn, NA, ERR, 

|ON I 
MSG, EXO= J 0Fp J , PAM=mode , Th=opt , TEXT=text , NOTES=«o£<3S . 

norerun, (enable i # 
(disable) 

OPTION, [LPP=tt,] STAT=| 0N ). 

I OFF J 

PASCAL, I=idn,L=ldn r B=bdn,0=list. 

fPDNl 
PDSDUMP, DN=(in , XN-ldv, { PDS \-pdn ,E\i-ed , CW=cw, ID=uid, US=usn,om=ov , 

IW>mm/dd/yy: ' hh:mm: ss ' ,KRC=mm/dd/yy. ' hh:mm: ss' , 

TS=0p£,X,C,D,I,O,S,B,SO. 

(PDNI 
PDSLOAD , L=ldn , TM=dn i j p DS j =pds , EU-ed , CW=<3W , TD-uid , NID=WUt(i , 

US=uS«,OWN=oy,NOWN=T2oy,DV=cfyw,RP,CR,A,I,0,S,NA,SO,TLA. 

PERMIT , PDN=p<?W, TQ-uid, AM=m, RP , USER=<?y , ADN= adn, NA, ERR, MSG . 

PRINT (^repression) 

PROC. 

RELEASE , DU-dni : dn 2 : . . . : dn% , HOLD . 
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7-8 

7-13 
12-6 
7-17 
9-2 

SR-0066 

SR-0066 

7-18 

SG-0056 

12-5 

12-4 

12-4 

12-6 

SR-0033 

10-10 

7-7 

13-22 

SG-0055 

SR-0013 

12-7 



RERUN, (ENABLE I. 
I DISABLE I 



RETURN [, ABORT] . 

REWIND,DN=<ini:<in2 : • • • 'drig. 
ROLLJOB. 

SAVE , Dtt=dn , PDN=pe?n , lD=uid , ED=ed , RT=r£ , R=rd , W=w t , M=rrm , UQ , NA , ERR , 

MSG , EXO= | 0N I , PPM=mode , &DU=adn {m) , Th=opt , TEXT=t ext , 
(OFF I 

NOTES=rz<9tes. 
SEGLDR, I=idn , L= Idn , m=dw , CMD= • dirs t r' . 
SEGRLS . 

SET (symbol=expression) 
SiD=adn,i=idn,L=ldn,ECR=edn,cm=n, 

SKIPD,DN=<2«. 

SKIPF , DN=<in , NF=n . 

SKIPR , DH=dn , NR=tt . 

SKIPU,DN=£?n,NS=ttS. 

SKOL, l^dn f L=ldn f X=xdn,E=edn,0=odn,M=rrdn,VIEVl t LISTOFF, • " •=£, 

SUBMIT, DK=dn , SID=s/, DID=C?/, TID=K<2,DEFER,NRLS . 

SWITCH ,n=X. 

SYSREF , X=xdn , L= Idn . 

TEDl,DN=*frz, l=idn,L=ldn. 

UPDATE , P=pdn , I^idn^ : idn 2 : . . . : idn n , C=edn , U=ndn , L= Idn , E=edn , 
S=sdn,*=m,/=e r IM=dw,DC=de,FML=n,Q[=d 1 :d2i . . . id n , 
options. Q^d^,d 2 , • .. ,d -.d k ,.. . ,d n ' 

WRITEDS , DU=dn , m=nr , RL=r I . 
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* verb described, 6-2 
$BLD 

and B parameter on BUILD, 15-2 

and BUILD, 15-1 

default dataset with LDR, 14-2 

and FILE directive, 14-18, 14-23, 14-31 
$CCS routine in parameter interpretation, 

4-7 
$CS dataset 

at job termination, 3-3 

control statement 
creation of, 4-1 

file in interactive job processing, 
3-10 

described, 3-3 
$DUMP local dataset created, 13-1 
$IN datasets 

described, 3-3 

in interactive job processing, 3-10 

at job termination, 3-3 
$LOG 

dataset described, 3-3 

datasets at job termination, 3-3 to 3-4 
$OUT 

dataset 

described, 3-3 
name, 2-15 

datasets at job termination, 3-3 to 3-4 

maximum size specified, 7-2 

output dataset in interactive job 
processing, 3-10 
$PLOT dataset name, 2-15 
$PR0C 

with LIBRARY, 7-20 

system procedure dataset, 7-10 
$PUNCH dataset name, 2-15 
$RFI library routine, 2-16 
$RLB unblocked dataset routine in user I/O 

interfaces, 2-16 
$RUA call in user I/O interfaces, 2-16 
$SYSTXT relation to global symbols, 13-24 
$WLB unblocked dataset routine in user I/O 

interfaces, 2-16 
$WUA call in user I/O interfaces, 2-16 
$WUF library routine, 2-16 
&DATA 

in complex procedures, 16-23 

control statement - Procedure data, 
16-26 
♦SYSTEM in a relocatable load, 14-12 



parameter 
on the ASSIGN control statement, 

8-6 
on the COMPARE control statement, 

13-13 
on the PDSLOAD control statement, 
11-7 
value 

for the BO output formatting 

parameter on AUDIT, 11-11 
for the LO output formatting 
parameter on AUDIT, 11-11 
AB parameter on the LDR control statement, 

14-4 
Abort 

job advance, described, 3-3 
message on logfile, 3-12 
ABORT parameter 

on the COMPARE control statement, 

13-14 
on the RETURN control statement, 
7-14 
Absolute 

address and base address, 1-5 
binary object module generation, 

14-4 
load module described, 6-15 
AC parameter on the ACCOUNT control 

statement, 7-15 
ACC parameter on the AUDIT control 

statement, 11-10 
ACCESS 

control statement - Access permanent 

dataset, 9-5 
to make permanent datasets local, 

2-15 
request and magnetic tape datasets, 

2-3 
to specify label types for tape mark 

processing, 2-5 
system verb, 4-3 
verb described, 6-5 
Access 
mode 

for mass storage datasets, 6-9 
permitted for alternate user, 
parameter for, 9-20 to 9-21 
public, described, 6-6 
restriction for mass storage 
datasets, 6-8 
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Access (continued) 

privileges for a permanent dataset, 

1-6 
tracking, public, 6-6 
unique, parameter on ACQUIRE, 10-3 
ACCOUNT 

control statement - Validate user 
number and account, 7-14 
errors, 4-2 
format, 7-14 

in interactive jobs, 7-14 
in job deck, 3-2 
verb described, 6-2 
Account 

number 

parameter, 7-14, 7-15 
validated, 7-14 
password parameter, 7-14, 7-15 
Accounting 

information in logfile, 3-12 
mandatory, 3-2 
ACQUIRE 

control statement - Acquire permanent 
dataset, 10-1 thru 10-5 
for new permanent datasets, 6-7 
request treated as an ACCESS request, 

6-13 
system verb, 4-3 

verb for dataset staging control, 
7-11 
ADJUST 

to change permanent datasets, 2-14 
control statement - Adjust permanent 

dataset, 9-15 to 9-16 
macro, 9-16 
system verb, 4-3 
verb described, 6-5 
ADN parameter 

on the ACQUIRE control statement, 10-4 
on the PERMIT control statement, 9-21 
on the SAVE control statement, 6-8, 
9-4 
ALL 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
value for the ADN "arameter on SAVE, 
9-4 
Alphanumeric 

characters, values in positional 

parameters, 4-6 
string, values in keyword parameters, 
4-6 
AM parameter 

on the PERMIT control statement, 

6-9, 9-20 to 9-21 
value for the ACC parameter on AUDIT, 
11-10 
Analytical aids, section 13 

described, 6-14 
Apostrophes 

for key word parameters, 16-29 
APW parameter on the ACCOUNT control 
statement, 7-14, 7-15 



ARC parameter on the PDSDUMP control 

statement, 11-3 
Archive datasets 

parameter on PDSDUMP, 11-3 
Argument, control statement described, 4-4 
Arithmetic 

operators, 16-18 
Arrays dumped with DEBUG, 13-7 
AS value 

for the CS parameter on ACCESS, 

9-13 
for the CS parameter on ASSIGN, 8-7 
ASCII character set, Appendix C 
Assemblers loaded into user field, 1-5 
ASSIGN 

control statement - Assign dataset 
characteristics, 8-1 to 8-10 
to create a temporary dataset, 

2-12 
to create interactive datasets, 2-3 
dataset disposition code stated on, 

2-15 
format, 8-2 

to inhibit blank compression, 2-6 
used to define a memory-resident 

dataset, 2-2 
user allocation of storage through, 
1-6 
system verb, 4-3 
verb described, 6-3 
Attribute association, 6-8, 6-10 
Attributes dataset 
described, 6-8 
name 

parameter for, on ACQUIRE, 10-4 
AUDIT 

utility - Audit permanent datasets, 
11-8 thru 11-17 
described, 11-1 
information supplied by, 11-8 
listing example, 11-12 thru 11-17 
used for Notes, 6-6 
verb for permanent datasets, 6-13 
AUTO parameter on the MEMORY control 

statement, 7-5 
Automatic field length reduction mode, 
3-4 

in system management of memory, 3-7 
Auxiliary I/O Processor with I/O Subsystem, 
1-7 



parameter 

on the AUDIT control statement, 

11-9 
on the BUILD control statement, 

15-2 
on the ITEMIZE control statement, 

13-25 
on the PDSDUMP control statement, 11-3 
value 

for the DF parameter on COMPARE, 

13-13 
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BACKSPACE unavailable with interactive 

datasets, 2-3 
Bad data flag field, 2-7 
Base address of the user field, 1-5 
BB value for the DF parameter 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
BC parameter on the LDR control statement, 
14-9 

in memory management, 3-7 
BD value for the DF parameter 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
on FETCH, 10-12 
BDF, (Bad data flag) , 2-7 
Begin Code Execution Table (BGN) 

described, A-29 thru A-30 
Beg inning-of -data not skipped by SKIPR, 

12-4 
BFI parameter on the ASSIGN control 

statement, 8-6 
BGN, (Begin Code Execution Table) , A-29 

thru A-30 
Bidirectional transfer mode, 7-4 
Binary, see also Relocatable modules 
audit options specified on AUDIT, 

11-11 
blocked format value 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
data in a blocked dataset, 2-6 
deblocked format value 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
on FETCH, 10-12 
library datasets, output for, 13-27 

thru 13-29 
memory management associated with, 
3-7 
BL parameter on the ITEMIZE control 

statement, 13-25 
Blank 

common 

location in user field illustrated, 

3-5 
and relocatable overlays, 14-16 
starting address set by SBCA 
directive, 14-19 
compression 

described, 2-6 
inhibited by ASSIGN, 2-6 
field initiation, parameter on ASSIGN, 

8-6 
fields compressed, 2-6 
Blank common 

size of, 14-9 
parameter, 14-9 
Blanks 

compressed in blocked coded datasets, 

2-6 
in a control statement, 4-1 



Block 

control word 
described, 2-7 
disregarding, 2-9 
format illustrated, 2-7 
for interchange tape format, 2-11 
multiplexer channel 

and an Auxiliary I/O Processor, 

1-7 
in hardware requirements, 1-2 
number field in block control word, 

2-7 
Relocation Table and relocatable 

overlays, 14-15, 14-17 
type, codes for, 9-13 to 9-14 
Blocked 

coded files, blank field compression 

in, 2-6 
datasets 

copied, 6-13 
skipped, 6-14 
files 

copied, 6-13 
skipped, 6-14 
format described, 2-6 
records 

copied, 6-13 
skipped, 6-14 
BLOCKS parameter on the DEBUG control 

statement, 13-8 
BMR, see Buffer Memory 
BN, (Block number field in block control 

word) , 2-7 
BO parameter on the AUDIT control 

statement, 11-11 
Braces convention described, 4-7 
Brackets convention described, 4-7 
BS parameter on the ASSIGN control 
statement, 8-3, 8-4 

and memory-resident datasets, 2-2 
BT parameter on the MODE control statement, 

7-4 
Buffer 

datasets within, 2-2 
flushed to mass storage, 2-2 
full, and memory-resident dataset 

clearance, 2-2 
Memory 

dataset space divided in, 8-3, 8-4 
in hardware requirements, 1-2 
used as a tape block buffering area, 
2-3 
size parameter 

on the ASSIGN control statement, 

8-3, 8-4 
for memory-resident dataset 
definition, 2-2 
BUILD 

abort errors, 15-3 
to add binaries from $BLD, 15-1 
control statement, 15-1 to 15-3 
for object library management, 
6-15 
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BUILD (continued) 

directives, 15-3 

described, 15-5 
for procedure libraries, 5-1 
utility 

complex procedures and, 16-22 
in object library management, 
6-15, 15-1 
Burstable listing parameter on ITEMIZE, 
13-25 



parameter 

on the LDR control statement, 

14-6 
on the PDSDDUMP control statement, 
11-3 
value for RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-8 
C parameter on the ASSIGN control 

statement, 8-5 
CAL (Cray Assembly Language) 
language call 

for loading overlays, 14-25 
in Type 2 overlay execution, 14-33 
tables, expanded by LDR, 13-6 
CALL 

control statement - Read control 
statements from alternate dataset, 
7-9 

in creation of datasets, 4-1 
examples, 7-11 thru 7-13 
for procedure libraries, 5-1 
system verb, 4-3 
used with ECHO, 7-20 
verb described, 6-2 
CALL 

statement call 

for complex procedures, 16-22 
Caret symbol explained, 4-1 
CAUTION error message, 14-8 
CB parameter on the FTREF control 

statement, 13-18 
CB value for the DF parameter 
on ACQUIRE, 10-4 
on ASSIGN, 8-4 
on DISPOSE, 10-7 
on FETCH, 10-11 
CD value for the DF parameter 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
on FETCH, 10-11 
CDC, see also Control Data 
system-logical records 
RS parameter for, 9-15 
RS restriction for, 8-9 
tape files 

MBS values on ACCESS, 9-11 
RF parameter on ASSIGN, 8-7 
RS restrictions for, 8-9 
tape format parameter on ASSIGN, 8-7 



CDC-compatible sequential file, 9-12 

parameter, 8-6 
CENTER parameter on the DUMP control 

statement, 13-4 
Central Memory 

assignment illustrated, 1-4 
characteristics summarized, 1-2 
and the Cray Operating System, 1-1 
in hardware requirements, 1-1 
use by jobs, 3-4 
Central Processing Unit in hardware 

requirements, 1-1 
CFT, see also FORTRAN 

tables expanded by LDR, 13-6 
Channel access 
user, B-5 

described, B-5, B-6 
Character blocked 
format, 2-9 

value on ACQUIRE, 10-4 
value on ASSIGN, 8-4 
value on DISPOSE, 10-7 
value on FETCH, 10-11 
mode for interactive format datasets, 
2-9 
Character deblocked format 
value parameter 
on ACQUIRE, 10-4 
on DISPOSE, 10-7 
value on FETCH, 10-11 
Character set 

described, Appendix C 
foreign data, 9-12 

parameter for, on ASSIGN, 8-7 
Character-count block type, value on 

ASSIGN, 8-8 
CHARGES 

control statement - Job step 

accounting, 7-16 
verb described, 6-2 
CHECK field on ITEMIZE listing, 13-27, 

13-28 
CHKBLK directive for FTREF, 13-20 
CHKMOD directive for FTREF, 13-21 
CIO, (Circular I/O routines) , 2-18 
Circular I/O routines in logical I/O, 

2-18 
CL parameter on the JOB control statement, 

7-3 
Classes of messages written to logfile, 7-20 
CLOSE macro with user tape end-of-volume 

processing, 2-4 
CLOSEV macro with user tape end-of-volume 

processing, 2-4 
CNS parameter 

on the CALL control statement, 7-10, 

7-11 
on the LDR control statement, 14-6 
Coded data in a blocked dataset, 2-6 
Comment 

control statement, 4-1 
on load map, 14-12 
statement described, 7-7 
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COMMENT 

error message, 14-8 
parameter on the DEBUG control 
statement, 13-8 
Common block variables 

reports, 13-17 
Communication paths 

in establishing Interjob 
Communication, B-2 
Communication Paths 

in Interjob Communication, B-3 
sending and receiving messages, B-3 
Communication paths 

in closing Interjob Communication, B-4 
COMPARE 

as analytical aid, 6-14 
utility - Compare datasets, 13-12 to 
13-14 
COMPARE 

utility, 13-1 
summarized, 13-1 
Compilers loaded into user field, 1-5 
Complex 

procedure, 16-22 
Compressed load parameter, 14-6 
Concatenation separator described, 4-5 
Conditional 
block 

basic described, 16-5 to 16-10 
basic illustrated, 16-5 
with ELSE, 16-6 to 16-7 
with ELSEIF and ELSE, 16-9 to 16-10 
with ELSEIF, 16-7 to 16-8 
in exit processing, 3-8 
structures, 16-5 to 16-10 
control statement blocks 
described, 16-2 to 16-10 
summarized, 16-1 
Constants 

integer defined, 16-13 
literal defined, 16-14 
statement 

blocks, conditional, 16-2 to 16-10 
blocks, iterative, 16-10 to 16-13 
prototype, 16-26 
sequences, simple, 16-1 
Context printed or scanned, 13-13 
Contiguous space allocation parameter on 

ASSIGN, 8-5 
Continuation 

character described, 4-5 
separator , 4-1 
Control 

statement 

dataset created, 4-1 
file in a job deck, 3-1 
read, 7-9 to 7-10 
separators illustrated, 4-5 
syntax, 4-1 
verbs described, 4-2 
Statement Processor (CSP) 

in the Cray Operating System, 1-3 

dumped, 13-1 

in initial memory allocation, 3-4 



Control (continued) 

information on logfile, 3-12 
to load an execute-only dataset, 
2-14 
statements 

for job definition, 6-2 
for permanent dataset control, 
examples of, 9-21 thru 9-22 
listed in logfile, 3-12 
word block 

described, 2-7 
disregarding, 2-9 
for interchange tape format, 2-11 
format, 2-7 
word record described, 2-7 
words 

added to data, 2-6 

of blocked datasets, 2-6 

modifier on SAVE, 9-4 

permission, 1-6 

record, 2-6 

record for interchange tape format, 

2-11 
record value on ASSIGN, 8-7 to 8-8 
Control Data display code value 
on ASSIGN, 8-7 
on ACCESS, 9-13 
Control statements 

logic structures, 16-1 to 16-13 
Conventions described, 4-7 
Conversion mode parameter on ASSIGN, 8-7 
COPY directive 

described, 15-7 to 15-8 
examples, 15-8 

and file searching considerations, 
15-5 
COPYD utility - Copy blocked dataset, 
12-2 to 12-3 

for local datasets, 6-13 
summarized, 12-1 
COPYF utility - Copy blocked files, 12-2 
for local datasets, 6-13 
summarized, 12-1 
COPYR utility - Copy blocked records, 12-1 
for local datasets, 6-13 
summarized, 12-1 
COPYU utility - Copy unblocked datasets, 
12-3 

for local datasets, 6-13 
summarized, 12-1 
COS, see Cray Operating System 
CP parameter on the COMPARE control 

statement, 13-13 
CPU, see also Central Processing Unit 
option on the CHARGES control 

statement, 7-17 
serial number symbol, 16-15 
CR parameter on the PDSLOAD control 

statement, 11-6 
Crack next control statement, parameter 

to, 14-6 
Cracking, see Decoding 
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Cray 

Assembly language, see CAL 
Computer System configuration 

illustrated, 1-3 
Operating System 

and job control language, 4-1 
described, 1-1 

job processing described, section 3 
loaded at system initialization, 

1-2 
memory-resident summarized, 1-3 
Creation disposition parameter on ACCESS, 

9-8 
Cross-reference listing 
global 

format for, 13-23 to 13-24 
generated, 6-14 
generated by SYSKEF, 13-22 
CRT value for the DT parameter on ASSIGN, 

8-4 
CS 

parameter 

on the ACCESS control statement, 

9-12 to 9-13 
on the ASSIGN control statement, 

8-7 
on the COMPARE control statement, 
13-13 
value for the RF parameter 
on ACCESS, 9-14 
on ASSIGN, 8-8 
CSP, see Control Statement Processor 
Cursor controls inserted by user, 8-4 
CV parameter 

on the ACCESS control statement, 9-12 
on the ASSIGN control statement, 8-7 
CW 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
parameter 

on the AUDIT control statement, 

11-10 
on the COMPARE control statement, 

13-14 
on the PDSDUMP control statement, 

11-3 
on the PDSLOAD control statement, 
11-6 
value 

for the ADN parameter on SAVE, 9-4 
for the RF parameter on ACCESS, 

9-14 
for the RF parameter on ASSIGN, 
8-7 
CYBER operating system 
MBS 

parameter on ASSIGN and, 8-9 
values for, on ACCESS, 9-11 
CZ value for RF parameter 
on ACCESS, 9-14 
on ASSIGN, 8-8 



parameter on the PDSDUMP control 

statement, 11-3 
value for the FORMAT parameter on DUMP, 
13-3 
Data 

conversion enabled or disabled, 8-7 

file, 3-1 

hierarchy within a dataset illustrated, 

2-6 
transfer in user channel access, B-6 
transfers controlled by the Cray 

Operating System, 1-1 
Dataset 
access 

controlled, 9-20 

through permission control words, 
6-4 

relinquished, 8-1, 8-10 
attributes, mass storage, 6-4 
blocked 

copied, 12-1, 12-2 

format described, 2-6 

initialized, 6-14, 12-1, 
12-7 

skipped, 12-5 
Catalog 

changes with DELETE, 9-19 

entries with SAVE, 9-1 

and Master Device, 1-5 
cessation of permanence, 1-6 
characteristics defined, 8-1 
closed at the end of the load process, 

14-3 
compared, 13-12 
control verbs for, 6-3 
control words example, 2-10 
copied, 12-1 
declared memory resident, effect of, 

2-2 
default sizes defined by system 

parameters, 1-6 
defined, 1-5, 2-1 

by the Cray Operating System, 2-16 
definition 

and control, section 8 

verbs for, 6-3 
Definition List (DDL) 

described, A-31 thru A-32 

with F$DNT for dataset definition, 
2-2 
deleted after dump, 11-3 
deletion disallowed, 2-15 
directed 

to the input queue, 10-10 

to the output queue for staging, 
10-5 
disposition code 

described, 2-15 

role of, 2-1 
dumped, 13-9 
execute-only 

described, 2-14 

not memory resident, 2-2 
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Dataset (continued) 
expired, 11-3 
foreign 

conversion mode parameter on ACCESS, 
9-12 
format 

interactive, 2-9 

parameter on ACQUIRE, 10-3 

parameter on ASSIGN, 8-4 

parameter on DISPOSE, 10-7 

parameter on FETCH, 10-11 

summarized, 2-6 

unblocked, 2-9 
input 

described, 1-6 

dumped, 11-4 

in job entry, 3-2 

loaded, 11-7 

made permanent, 2-14 

rewound with COMPARE, 13-12 
interactive 

described, 2-2 to 2-3 
intermediate, as memory-resident, 2-2 
job, submitted, 10-10 
job deck, 3-1 
library 

described, 6-16 

generated and maintained by BUILD, 
15-1 

inspected by ITEMIZE, 13-24 

output for, 13-27 
local, 2-1, 4-3, 8-1, 9-5 

dataset-name verbs, 4-3 

described, 2-15 

fetched, 10-11 

JOB control statement for, 2-15 

necessary for use, 2-1 

permanent dataset made local, 8-1, 
9-5 

utilities for, 6-13, 12-1 
longevity 

defined, 2-1 

described, 2-12 
made permanent and accessible to the 

job, 10-1 
magnetic tape 

availability, 2-3 

current volume closed, 2-3 

density of, parameter, 9-9 

described, 2-3 

formats described, 2-11 

ignored by ADJUST, 9-16 

ignored by MODIFY, 9-16 

label-type parameter, 9-10 

modification identifier on ACCESS, 
9-11 

not memory-resident, 2-2 

parameters, 9-9, 9-10 

record size parameter on ACCESS, 
9-13 

run time conversion parameters, 
9-12 
management, handling of, 6-3 
manipulation through job control 

language, 4-1 



Dataset (continued) 
mass storage 

attributes for, 6-7 to 6-8 

created, 8-1 

described, 2-1 

MODIFY used for, 9-16 

protection of, 6-8 

permanent, described, 2-14 

temporary, 2-12 
maximum size 

defined by system parameters, 1-6 

limit parameter on ASSIGN, 
8-5 
media classified, 2-1 
memory-resident 

changes made to, 2-2 

described, 2-2 

loading, 2-2 
modification disallowed, 2-15 
name 

local, as file identifier for tape 
datasets, 2-3 

restrictions on, 2-16 

role of, 2-1 

verbs, 4-2 thru 4-4 
naming conventions described, 2-16 
not destroyed, 6-3 
output 

deleted at job termination, 3-4 

described, 1-6 

disposition of, 2-14 

dumped, 11-4 

loaded, 11-7 
output and user tape end-of-volume 

processing, 2-4 
owner , 6-9 
Parameter Area (DSP) 

described, A-9 thru A-17 

and $DUMP, 13-2 

location in user field illustrated, 
3-5 

relation to IOAREA, 7-9 

in system memory management, 3-7 
partially deleted, 6-11 
permanent 

access control statement, 9-5 

additional edition created, 9-2 

audited with AUDIT, 11-8 

characteristics defined for, 9-1 

control statements for, 9-21 thru 
9-22 

described, 2-14 

deleted, 9-19 

dumped through PDSDUMP, 11-2 

editions dumped through PDSDUMP, 
11-2 

information changed, 9-16 

initial edition created, 9-2 

listed with AUDIT, 11-9, 11-10 

loaded with PDSLOAD utility, 11-5 to 
11-8 

maintenance, 1-6 

management, 6-3, section 9 

mass storage, 9-7, 9-15 to 9-16 
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Dataset (continued) 

privacy for, 11-1 

saved with SAVE control statement, 

9-1 
space accessed, 7-16 
status codes, E-7 thru E-ll 
system described, 2-14 
user, 2-14 

utilities for, 6-13, section 11 
positioned at the beginning of data, 

12-1 
recovered, 1-6 
reestablished, 1-6 

recovery after a system failure, 1-6 
residing on logical device, dumped by 

PDSDUMP, 11-2, 11-3 
saved, 1-6 

scratch described, 1-6 
sequential, initialized, 6-14 
size parameter on the ASSIGN control 

statement, 8-2 to 8-3 
skipped, 6-14, 12-6 
staged, and use of RELEASE, 8-10 
staging control, 6-11 to 6-13, 

section 10 
structure 

defined, 2-1 
summarized, 2-6 

unblocked, parameter on ASSIGN, 
8-4 
system, 4-4 
temporary, 2-2 

created with &DATA, 16-26 
creation of, 2-12 
described, 1-6 
translation, 8-6, 9-12 
unblocked, 12-6 
unblocked, copied, 6-13, 12-3 
use tracking, 6-8, 6-10 
user 

naming conventions, 2-16 
symbolic name assigned to, 2-16 
Datasets, section 2 
DATE field on ITEMIZE listing, 13-27, 

13-28 
DB parameter on the DSDUMP control 

statement, 13-11 
DC 

parameter 

on the ASSIGN control statement, 

8-5 to 8-6 
on the DISPOSE control statement, 
10-6 to 10-7 
value 

for the CS parameter on ACCESS, 

9-13 
for the CS parameter on ASSIGN, 
8-7 
DD-19 disk drive 

dataset size, 8-3 
DD-29 disk drive 

dataset size, 8-3 
DDL, see Dataset Definition List 



DEB parameter on the LDR control statement, 

14-5 
DEBUG 

as analytical aid, 6-14 
utility - Produce symbolic debug, 13-6 
thru 13-8 
example, 13-7 

parameters for arguments, 13-6 
Debug 

routine loading, parameter for, 14-5 
symbolic, 13-6 
Decoding of control statement parameters, 

4-7 
Default parameter on SUBMIT, 10-10 
DEFER parameter 

on the DISPOSE control statement, 

10-5, 10-9 
on the SUBMIT control statement, 10-10 
Deferred submit parameter on SUBMIT, 10-10 
DELETE 

control statement - Delete permanent 

dataset, 9-19 to 9-20 
system verb, 4-3 
verb described, 6-5 
Delimiters 

for keyword parameters, 16-28 
for parameter substitution, 16-27 
DEN parameter on the ACCESS control 

statement, 9-9 
Density of the tape dataset 

parameter on ACCESS, 9-9 
Destination medium of the dataset 

stated through disposition code, 2-15 
Device 

label 

and mass storage, 1-5 
in disk storage space allocation, 1-5 
type parameter on the ASSIGN control 
statement, 8-4 
DF parameter 

on the ACCESS control statement, 9-10 
on the ACQUIRE control statement, 10-3 
on the ASSIGN control statement, 8-4 
on the COMPARE control statement, 

13-13 
on the DISPOSE control statement, 10-7 
on the DSDUMP control statement, 13-10 
on the FETCH control statement, 10-11 
DID parameter on the SUBMIT control 

statement, 10-10 
DIR parameter on the FTREF control 

statement, 13-19 
Directive 

for BUILD, 15-5 

for overlay generation, example of, 

14-22 
for type 2 overlay generation, 14-29 
example of, 14-30 
Disk 

drives, 1-2 

DD-19 and DD-29 drives, 8-3 

Queue Manager 

Circular I/O routines communicate 
with, 2-18 
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DISPOSE 

control statement - Dispose dataset, 
10-5 thru 10-9 

dataset disposition code stated on, 
2-15 
invalid with tape datasets, 6-12 
requests not honored, 2-15 
system verb, 4-3 

verb for dataset staging control, 
6-11 
Disposition code 
parameter 

on DISPOSE, 10-6 to 10-7 
on ASSIGN, 8-4 to 8-6 
role of, 2-1 
Disposition codes dataset described, 2-15 
DQM (Disk Queue Manager) , 2-18 
Driver 

macro, B-5 

for user channel access, B-5 
Driver FORTRAN 

subroutine, B-5 
to user channel access, B-5 
DRPB (User Driver Parameter Block) 

described, A-49 through A-52 
DS option on the CHARGES control statement, 

7-16 
DSC, see Dataset Catalog, Permanent 

Dataset Catalog 
DSDUMP 

as analytical aid, 6-14 
output format, 13-12 
utility - Dump dataset, 13-9 to 13-12 
summarized, 13-1 
DSP, see also Dataset Parameter Area 
parameter on the DUMP control 
statement, 13-3 
DSU, see Disk Storage Unit 
DSZ parameter on the DSDUMP control 

statement, 13-11 
DT parameter 

on the ACCESS control statement, 9-8 
on the ASSIGN control statement, 8-4 
DUMP 

as analytical aid, 6-14 
parameter on the DEBUG control 

statement, 13-7 
utility - Dump registers and memory, 
13-2 thru 13-5 

format examples, 13-4 thru 13-5 
summarized, 13-1 
DUMP JOB 

as analytical aid, 6-14 
control statement not continued, 4-1 
requests not honored, 2-15 
summarized, 13-1 

utility - Create $DUMP, 13-1 to 13-2 
DV parameter 

on the ASSIGN control statement, 8-4 
on the AUDIT control statement, 11-9 
on the PDSDUMP control statement, 11-2 
on the PDSLOAD control statement, 11-6 



parameter 

on the ITEMIZE control statement, 

13-24 
on the LDR control statement, 14-7 
to 14-8 
value 

for the AM parameter on PERMIT, 

9-20 
for the PAM parameter on MODIFY, 

9-18 
for the PAM parameter on SAVE, 9-4 
EB value 

for the CS parameter on ACCESS, 9-13 
for the CS parameter on ASSIGN, 8-7 
ECHO 

control statement - Enable or suppress 

logfile messages, 7-19 
statement and control statements listed 

in logfile, 3-12 
system verb, 4-3 
verb described, 6-2 
ED parameter 

on the ACCESS control statement, 9-7 
on the ACQUIRE control statement, 10-2 
on the DISPOSE control statement, 10-8 
on the MODIFY control statement, 9-17 
on the PDSDUMP control statement, 11-2 
on the PDSLOAD control statement, 11-6 
on the SAVE control statement, 9-2 
Edition number 

new, parameter for, 9-17 
parameter 

on ACCESS, 9-7 
on ACQUIRE, 10-2 
on DISPOSE, 10-8 
on PDSLOAD, 11-6 
on SAVE, 9-2 
of permanent dataset dumped through 
PDSDUMP, 11-2 
ELSE 

system verb, 4-3 
ELSE control statement - Define alternate 

condition, 16-3 
ELSE IF 

system verb, 4-3 
ELSEIF control statement - Define alternate 

condition, 16-3 to 16-4 
EMA parameter on the MODE control 

statement, 7-4 
END parameter on the FTREF control 

statement, 13-19 
End-of-data in job deck, 3-2 
End-of-file record in job deck, 3-2 
End-of -record control word, 2-9 
ENDIF 

system verb, 4-3 
ENDIF control statement - End conditional 

block, 16-2 to 16-3 
ENDLOOP 

system verb, 4-3 
ENDLOOP control statement - End iterative 
block, 16-11 
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ENDPROC 

in complex procedures, 16-23 
control statement - End procedure 

definition, 16-27 
effect on procedure definition, 7-10 
system verb, 4-3 
ENDSP macro with user tape end-of-volume 

processing, 2-4 
Entry points 

parameter for, on ITEMIZE, 13-24 
EOF not skipped by SKIPR, 12-4 
Equivalence separator described, 4-5 
ERECALL 

macro, B-7 

for Event Recall, B-7 
FORTRAN subroutines, B-7 
ERPB (Event Recall Parameter Block) 

described, A-47 through A-49 
ERR parameter 

on the ACCESS control statement, 8-6 
on the ACQUIRE control statement, 10-5 
on the ADJUST control statement, 9-16 
on the DELETE control statement, 9-20 
on the MODIFY control statement, 9-18 
on the PERMIT control statement, 9-21 
on the SAVE control statement, 9-3 
Error 

class saved on reprieve processing, 

3-10 
code saved on reprieve processing, 

3-10 
codes described, Appendix E 
conditions described, 3-9 to 3-10 
at job termination, 3-4 
listing, parameter for, 14-7 to 14-8 
message parameter 
on ACCESS, 9-6 
on ACQUIRE, 10-5 
on ADJUST, 9-16 
on DELETE, 9-20 
on MODIFY, 9-18 
on PERMIT, 9-21 
on SAVE control statement, 9-3 
Errors 

cause BUILD to abort, 15-3 
syntax, see Syntax violations 
Establishing attributes for mass storage 

datasets, 6-7 to 6-8 
Event Recall 

described, B-6 and B-7 
Event Recall Parameter Block (ERPB) 

described, A-47 
Exchange Package 

described, Appendix D 
in the Cray Operating System, 1-3 
with the MODE control statement, 7-3 
Exchange Processor 

calls in user I/O interfaces, 2-18 
information on logfile, 3-12 
requests 

I/O routines communicated through, 

2-18 
in user I/O interfaces, 2-18 



EXCLUDE directive for selective load, 

14-13 
EXEC in the Cray Operating System, 1-3 
Executable program creation, section 14 

summarized, 6-15 
Execute-only dataset 
described, 2-14 
differences from other user permanent 

datasets, 2-14 thru 2-15 
not memory-resident, 2-2 
parameter 

on MODIFY, 9-18 
on SAVE, 9-3 
Existing permanent dataset 

attributes for, 6-7 
EXIT 

control statement - Exit processing, 
3-8, 7-5 

in job step aborts, 4-2 
not continued, 4-1 
within control statement blocks, 
3-8 
system verb, 4-3 
verb described, 6-2 
Exit processing 
described, 3-8 
on an interactive job, 3-10 
EXITIF 

system verb, 4-3 
EXITIF control statement - Exit from 

conditional block, 16-4 
EXITLOOP 

system verb, 4-3 
EXITLOOP control statement - End iteration, 

16-11 to 16-13 
EXO parameter 

on the MODIFY control statement, 9-18 
on the SAVE control statement, 9-3 
EXP, see Exchange Processor 
Expiration date parameter on the ACCESS 

control statement, 9-12 
Expression 

defined, 16-13 

evaluation, 16-18 

operands, 16-13 to 16-16 

operator table, 16-17 

operators, 16-16 to 16-18 

parameter on the SET control statement, 

7-18 
value of, written to logfile, 13-14 
Extended memory addressing mode, 7-4 



parameter 

on the ACCESS control statement, 

9-13 
on the ASSIGN control statement, 
8-7 
value for the RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
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F$DNT system call 

to create interactive datasets, 2-3 
to define a memory-resident dataset, 
2-2 
F5DRIVER 

system request, B-5 
for user channel access, B-5 
F$ERCL 

system request, B-7 
for Event Recall, B-7 
FORTRAN subroutines, B-7 
F$RDC call, record control words and, 2-9 
F$WDC call, record control words and, 2-9 
False value, symbol for, 16-16 
FATAL error message, 14-8 
FB value for the RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
FD parameter 

on the ACCESS control statement, 9-12 
on the ASSIGN control statement, 8-6 
FETCH 

control statement - Fetch local 

dataset, 10-11 
system verb, 4-3 

verb for dataset staging control, 
6-12 
FI parameter on the MODE control statement, 

7-4 
Field label types 

for tape mark processing, 2-4, 2-5 
Field length 

reduction of, 3-4 to 3-5 
specified on the MEMORY control 

statement, 7-5 
user managed, 3-5 
FILE 

directive described, 14-18 
field on ITEMIZE listing, 13-27 
File 

control statement, 3-1 

data, 3-1 

identifier for tape datasets, 2-3 

number, specified on the selective load 

directives, 14-13 to 14-14 
output sequence, and BUILD, 15-4 
searching considerations, 15-5 
section number parameter on ACCESS, 

9-9 to 9-10 
source, 3-1 

sequence number parameter on 
ACCESS, 9-15 
File-level output, with ITEMIZE, 13-26 
Files 

blocked 

copied, 6-13, 12-1, 12-2 
skipped, 12-4 to 12-5 
following the control statement file, 

3-2 
skipped, 6-14 
First word address of memory dumped, 13-3 
Fixed-length blocked records value 
on ACCESS, 9-13 
on ASSIGN, 8-7 



FL parameter on the MEMORY control 

statement, 7-5 
Floating-point interrupt mode, 7-4 
FLODUMP utility 

summarized, 13-1 
FLODUMP utility - Flow trace recovery dump, 
13-15 

as analytical aid, 6-14 
examples, 13-16, 13-17 
Flow trace 

recovery dump, 13-15 

example, 13-17 
summary example, 13-16 
FN parameter on the selective load 

directives, 14-13 to 14-14 
Foreign 

data character set parameter 
on ACCESS, 9rl2 to 9-13 
on ASSIGN, 8-7 
dataset 

conversion mode parameter on ACCESS, 

9-12 
conversion mode parameter, 8-7 
translation identifier parameter on 

ACCESS, 9-12 
translation identifier parameter on 
ASSIGN, 8-6 
Formal parameters 

in complex procedures, 16-22 
specifications for substitution, 16-25 
Format 

for interactive output, 2-9 
tape dataset, described, 2-11 
transparent, for interactive output, 

2-9 
unblocked, 2-9 
FORMAT parameter on the DUMP control 

statement, 13-3 
FORTRAN 

I/O statements, user interface levels, 

2-16 
language call 

for loading overlays, 14-25 
in Type 2 overlay execution, 14-32 
statements categories, 2-16 
FORTRAN reference listing generated 

by FTREF, 13-17 
Forward index field 

in block control word, 2-7 
in record control word, 2-8 
FROM directive for BUILD, 15-6 
Front-end 

computer identifier parameter 
on ACQUIRE, 10-3 
on DISPOSE, 10-8 
job presentation to the Cray Operating 

System, 1-1 
protect indicator parameter on ACCESS, 

9-11 
servicing mainframe identifier 
parameter on ACCESS, 9-9 
FSEC parameter on the ACCESS control 

statement, 9-9 to 9-10 
FSEQ parameter on the ACCESS control 
statement, 9-15 
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FSU option on the CHARGES control 

statement, 7-17 
FTREF 

directives, 13-19 
example, 13-21 through 13-22 
FTREF utility 

summarized, 13-1 
FTREF utility generate FORTRAN 

listing, 13-17 
FULL 

value 

for the CB parameter on FTREF, 13-18 
for the TREE parameter on FTREF, 13-18 
for the MAP parameter on LDR, 14-4 
FWA parameter on the DUMP control statement, 

13-3 
FWI (Forward index field) 

in block control word, 2-7 
in record control word, 2-8 



G value for the FORMAT parameter on DUMP, 

13-3 
Generation 

directive 

for type 2 overlays, example, 14-30 
example, 14-22 
of relocatable overlays described, 
14-15 
Generic 

name with a controlled device, 8-3 
resource held with RELEASE, 8-10 
GETPARAM routine in parameter 

interpretation, 4-7 
Global 

cross-reference listing 

format for, 13-23 to 13-24 
generated, 6-14 
symbols defined, 16-14 
GRANT parameter on the LDR control 
statement, 14-8 to 14-9 



Hardware requirements summarized, 1-1 to 1-2 
Header entry in the Label Definition 

Table, A-42, A-45 
Heap 

location 

specified, 14-10 
in user field illustrated, 3-5 
manager , 14-10 

smallest block of available space in 
the, 14-10 
High Limit Memory Address relation to 

IOAREA, 7-9 
HLM (High Limit Memory Address) , 7-9 
HOLD parameter on the RELEASE control 

statement, 8-10 
Hollerith string and library routine 
SYMDEBUG, 13-6 



parameter 

on the BUILD control statement, 

15-1 
on the COPYD control statement, 

12-3 
on the COPYF control statement, 

12-2 
on the COPYR control statement, 

12-1 
on the COPYU control statement, 

12-3 
on the DEBUG control statement, 

13-7 
on the DSDUMP control statement, 

13-10 
on the DUMP control statement, 13-3 
on the FTREF control statement, 13-18 
on the LDR control statement, 14-8 
on the PDSDUMP control statement, 

11-4 
on the PDSLOAD control statement, 
11-7 
value 

for the F parameter on ACCESS, 

9-13 
for the F parameter on ASSIGN, 8-7 
for the RF parameter on ACCESS, 

9-13 
for the RF parameter on ASSIGN, 
8-8 
I/O 

area, user's access to, 7-9 
Buffers location in user field 

illustrated, 3-5 
circular routines, 2-18 
interfaces 

Exchange Processor calls in, 2-18 
for datasets, 2-1 
user, described, 2-16 thru 2-18 
user, illustrated, 2-17 
statements, FORTRAN user interface 

levels, 2-16 
Subsystem 

components , 1-2 
in hardware requirements, 1-2 
with Auxiliary I/O Processor, 1-7 
wait time listed in logfile, 3-12 
I@BFI parameter to define blank field 

initiator code, 2-6 
IBM 

record format parameter on ACCESS, 

9-13 to 9-14 
tape file translation value on ACCESS, 

9-13 
tape files 

MBS values on ACCESS, 9-11 
MBS values on ASSIGN, 8-9 
RS defaults for, 8-8 
RS restrictions for, 8-9 
IBM-compatible 

control unit attached to block 
multiplexer channel, 1-7 
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IBM-compatible (continued) 
sequential file, 9-12 

parameter, 8-6 
tape subsystem in hardware 
requirements, 1-2 
IC value for the DF parameter on ACCESS, 

9-10 
ID parameter 

on the ACCESS control statement, 9-7 
on the ACQUIRE control statement, 10-2 
on the AUDIT control statement, 11-9 
on the DISPOSE control statement, 10-8 
on the MODIFY control statement, 9-17 
on the PDSDUMP control statement, 11-3 
on the PDSLOAD control statement, 11-6 
on the PERMIT control statement, 9-20 
on the SAVE control statement, 9-2 
IF 

parameter on the DSDUMP control 

statement, 13-10 
system verb, 4-3 
IF control statement - Begin conditional 

block, 16-2 
IJPB (Inter job Communication Parameter 

Block) described, A-55 through A-57 
Immediate reply parameter on ACCESS, 9-6 
IN value for the DC parameter 
on ASSIGN, 8-5 
on DISPOSE, 10-6 
INC parameter 

on the ASSIGN control statement, 8-5 
on the PDSDUMP control statement, 11-3 
with SZ on the ASSIGN control statement, 
8-3, 8-5 
INCLUDE directive for selective load, 

14-13 
Incremental dump parameter on PDSDUMP, 

11-3 
Initial 

memory allocation in job memory 

management, 3-4 
separator described, 4-5 
transfer on load map, 14-12 
Initialization of local datasets, 6-13 
Initializing for stack processing, 

parameter for, 14-9 
Input dataset 

in job entry, 3-2 
at job initiation stage, 3-3 
made permanent, 2-14 
permanent, described, 1-7 
value on DC parameter, 10-6 
Installation-defined control word for 

PDSDUMP, 11-3 
Integer constants 

defined, 16-13 
Interactive 
datasets 

described, 2-2 to 2-3 
differ from local datasets, 2-2 
not memory-resident, 2-2 
device type specified on ASSIGN, 8-4 
format described, 2-9 
job processing described, 3-10 



Interactive (continued) 

job step initiated with a control 

statement, 3-10 
jobs 

control of, by the Cray Operating 

System, 1-1 
in exit processing, 3-9 
output 

datasets, TRAN used for, 2-8 
formats, 2-9 
tape format 

described, 2-11 
illustrated, 2-13 
Interchange value for the DF parameter on 

ACCESS, 9-10 
Intergrated Support Processor, see ISP 
Inter job Communication 

closing communication paths, B-4 
described, B-l through B-5 
establishing paths, B-2 to B-3 
illustrated, B-3 

sending and receiving messages, B-3 
and B-4 
Interjob Communication Message Buffer (MHB) 

described, A-54 
Interjob Communication Parameter Block 
(IJPB) 
described, A-55 through A-57 
Intermediate datasets as memory-resident 

datasets, 2-2 
Internal block type value on ASSIGN, 8-8 
Interruption, system, 7-17 
IOAREA 

control statement - Control user's 

access to I/O area, 7-9 
system verb, 4-3 
verb described, 6-2 
IOS, see I/O Subsystem 
IR parameter 

on the ACCESS control statement, 9-6 
on the DSDUMP control statement, 13-10 
IS parameter on the DSDUMP control 

statement, 13-11 
ISP 

access to, 8-1 
blank field initiation, 8-6 
control statements, 8-11 
Italics convention described, 4-7 
ITEMIZE utility - Inspect library datasets, 
13-24 thru 13-29 

as analytical aid, 6-15 
restrictions, 13-26 
sample listing for a PL, 13-26 
summarized, 13-1 
Iterative control statement blocks 
described, 16-10 to 16-13 
illustrated, 16-12 
summarized, 16-1 
IW 

parameter on the DSDUMP control 

statement, 13-10 
value for RF parameter 
on ACCESS, 9-14 
on ASSIGN, 8-8 
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JBI (JCL Block Information Table) , A-35 
JCB, see Job Communication Block 
JCHLM set to the highest address, 14-20 
JCL Block Information Table (JBI) 

described, A-35 
JCL Symbol Table (JST) described, A-35 thru 

A-37 
JCL, see Job Control Language 
JN parameter on the JOB control statement, 
7-2 

to rename $OUT, 3-3 
JNU option on the CHARGES control 

statement, 7-16 
Job 

accounting information described, 

3-10 to 3-13 
advancement stage described, 3-3 
class specified on the JOB control 

statement, 7-3 
Communication Block (JCB) 
described, A-l thru A-7 
length parameter, 14-5 
location in user field illustrated, 

3-5 
at type 1 overlay loading, 

illustration of, 14-21 
at type 2 overlay loading, 

illustration of, 14-28 
and the user field, 1-5 
control language 

described, section 4 
expression evaluation, 16-18 
expressions, 16-13 to 16-20 
functions, 6-1 

logic structures allowed, section 16 
verbs described, 4-2 to 4-4 
deck dataset described, 3-1 
defined, 3-1 

definition and control, 7-1 
entry stage described, 3-2 
field length 

symbol for, 16-15 
flow 

determined by control statements, 

6-1 
described, 3-2 thru 3-4 
initiation stage described, 3-2 
interactive in exit processing, 3-9 
logfile described, 3-10 
management, see Job Table Area 
memory management 
described, 3-4 

initial memory allocation in, 3-4 
name on load map, 14-12 
nonrerunnable, reasons for a, 3-7 
processing 

described, section 3 
requirements, control statements to 
specify, 7-1 
pseudo-registers 

symbol for, 16-15 
recovery with ROLLJOB, 7-17 to 7-18 
reprieve processing, 3-9 to 3-10 
rerun described, 3-7 



Job (continued) 

rolled to disk, 7-17 
size 

defined, 3-4 

minimum and maximum, option on 
CHARGES control statement, 7-17 
stages described, section 3 
status register 

symbol for, 16-15 
step 

abort and syntax errors, 4-2 

abort, user-requested, 3-8 

error conditions, 3-9 

mult i tasked, 3-3, 3-12 
normal termination of, 3-9 
Table Area (JTA) 

described, 1-4, A-l 

dumped, 13-3 

illustrated, 3-5 

at job initiation stage, 3-3 

in job size, 3-4 

listed in logfile, 3-13 

in system memory management, 3-7 
terminated when EXIT not found, 4-2 
termination error, 3-4 
termination stage described, 3-3 to 3-4 
user area described, Appendix A 
wait, parameter on DISPOSE, 10-9 
JOB 

control statement - Job identification, 

7-1 

execution in memory allocation, 3-4 

format, 7-1 

JN parameter on, 3-3 

in job deck, 3-2 

at job initiation stage, 3-2 

job name from, on load map, 14-11 

and magnetic tape datasets, 2-3 

used for local datasets, 2-15 
system verb, 4-3 
verb - Introduces the job to the 

operating system, 6-2 
JST, see JCL Symbol Table 
JTA (Job Table Area) , A-36 thru A-37 
parameter on the DUMP control 

statement, 13-3 
Julian date on load map, 14-12 



Keyword 

parameters 

described, 4-6, 16-28 
examples, 4-7 
and positional parameters, 16-28 



parameter 

on the AUDIT control statement, 

11-9 
on the BUILD control statement, 

15-2 
on the COMPARE control statement, 

13-13 
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L (continued) 

on the FTREF control statement, 13-18 
on the ITEMIZE control statement, 

13-25 
on the LDR control statement, 14-7 
on the PDSLOAD control statement, 

11-6 
on the SYSREF control statement, 
13-22 
value for the LO output formatting 
parameter on AUDIT, 11-11 
Label Definition Table (LDT) described, A-38 
Last word address 

on load map, 14-13 
of memory, dumped, 13-3 
LB parameter on the ACCESS control 

statement, 9-10 
LDR control statement, 14-1 to 14-10 

in executable program creation, 6-15 
to load a program in relocatable 

format, 14-1 
not applicable with execute-only 

datasets, 2-15 
and overlay generation log, 14-34 
and overlays, 14-17 thru 14-34 
LDT, see Label Definition Table 
LENGTH field on ITEMIZE listing, 13-27, 

13-28 
Level hierarchy in overlay generation, 

14-24 
LEVEL parameter on the FTREF control 

statement, 13-19 
LFT, see Logical File Table 
LIB parameter on the LDR control statement, 

5-1, 14-3 
Libraries, section 5 

constructed by BUILD program, 15-1 
merged through the LIST directive for 
BUILD, 15-9 
LIBRARY 

control statement - List and/or 

change library searchlist, 7-20 to 
7-21 
system verb, 4-3 
verb described, 6-3 
Library 

datasets 

described, 6-16 
described by ITEMIZE, 5-2 
generation and maintenance of, 
15-1 
routines called by FORTRAN statements, 

2-16 
searchlist 

listed or changed, 7-20 
for verbs, 4-2 
subroutine ACCESS for local datasets, 
2-15 
Library-defined verbs, 4-2, 4-3 
Limit address of the user field, 1-5 
LIST directive for BUILD, 15-8 to 15-9 
Literal 

delimiters described, 4-5 
caret within a, 4-1 



Literal (continued) 

constants defined, 16-14 
strings, 16-19 to 16-20 
values in positional parameters, 
4-6 
LLD parameter on the LDR control statement, 

14-4 
LM parameter on the ASSIGN control 

statement, 8-5 
LO parameter on the AUDIT control 

statement, 11-11 
Load map described, 14-10 to 14-11 
illustrated, 14-11 
load type indicated on, 14-12 
Loader expands special tables from CFT and 

CAL, 13-6 
Local 

dataset, 2-1 
described, 2-15 
name as file identifier for tape 

datasets, 2-3 
verbs described, 4-3 
utilities, 6-13, section 12 
symbols defined, 16-14 
LOCK parameter on the IOAREA control 

statement, 7-9 
Locked area 

check for with FTREF, 13-19, 13-20 
Logf ile 

comments in, 4-1 
defined, 3-10 
illustrated, 3-11 
messages 

in interactive job processing, 

3-10 
listed in logfile, 3-12 
suppressed or enabled, 7-19 
Logical 

device indicated on PDSLOAD, 11-6 
device parameter on the ASSIGN 

control statement, 8-4 
File Table (LFT) 
described, A-8 
location in user field illustrated, 

3-5 
in system memory management, 3-7 
Logical 

operators, 16-18 
LOOP control statement - Begin iterative 

block, 16-10 to 6-11 
LPP parameter on the OPTION control 

statement, 7-21 
LWA parameter on the DUMP control statement, 
13-3 



field, 2-7 
parameter 

on the ACCESS control statement, 

9-7 
on the ACQUIRE control statement, 
10-3 



SR-0011 



Index-15 



M 



M (continued) 

on the DISPOSE control statement, 

10-8 
on the MODIFY control statement, 

9-18 
on the SAVE control statement, 9-3 
value 

for the AM parameter on PERMIT, 

9-20 
for the FORMAT parameter on DUMP, 

13-4 
for the PAM parameter on MODIFY, 

9-18 
for the PAM parameter on SAVE, 9-4 
Magnetic tape 

characteristics, 1-7 
classification, 2-3 
dataset 

described, 2-3 
current volume closed, 2-3 
management verbs described, 6-5 
not memory-resident, 2-2 
value specified on ASSIGN, 8-6 
Mainframe 

identifier 

symbol for, 16-15 
Mainframe computer identifier 
parameter on FETCH, 10-12 
Maintenance 

Control Unit in hardware 

requirements, 1-1 
control word parameter 
on ACCESS, 9-7 
on ACQUIRE, 10-3 
on DISPOSE, 10-8 
on SAVE, 9-3 
permission control word, 9-18 
Managed memory 

processing initialized, 14-10 
statistics on load map, 14-13 
Management of memory, 3-6 
Map control, parameter for, 14-4 
MAP parameter on the LDR control statement, 

14-4 
Mass storage 

characteristics described, 1-5 
and the Cray Operating System, 1-2 
datasets 

accessing, 6-8 
attributes, 6-4, 6-7 
described, 2-1 

management verbs described, 6-5 
protecting, 6-8 
permanent dataset 
creation of, 1-6 
described, 2-14 

recovery after a system failure, 
1-6 
Mass Storage Subsystem in hardware 

requirements, 1-2 
Master Device described, 1-5 
MAXDIM parameter on the DEBUG control 
statement, 13-8 



Maximum 

field length on the JOB control 

statement, 7-2 
size of $OUT specified on the JOB 

control statement, 7-2 
tape block size parameter 
on ACCESS, 9-11 
on ASSIGN, 8-9 to 8-10 
MBS parameter 

on the ACCESS control statement, 9-11 
on the ASSIGN control statement, 8-9 to 
8-10 
MCU (Maintenance Control Unit) , 1-1 
ME parameter on the COMPARE control 

statement, 13-13 
Memory 

addresses relative to the beginning 

address, 1-5 
areas, 3-4 

dumped with DUMP, 13-2 
initilization parameter on LDR, 14-7 
layout 

and relocatable overlay images, 

14-16 to 14-17 
and relocatable overlays, 14-16 
management, 3-4 

associated with a program described, 

3-7 
by control statement, 3-6 
by the system, 3-7 
by user, described, 3-6 to 3-7 
from within a program, 3-6 
set to a value that causes an 

out-of-range error, 14-7 
transfers enabled and disabled, 7-4 
MEMORY 

control statement - Request memory 

change 7-5 thru 7-6 
in user management of memory, 3-6 
macro for memory management from within 

a program, 3-6 
routine in user management of memory, 

3-6 
system verb, 4-3 
verb described, 6-2 
Memory-resident datasets 
changes made to, 2-2 
defined through ASSIGN, 2-2 
described, 2-2 
loaded, 2-2 

parameter on ASSIGN, 8-5 
as temporary datasets, 2-2 
Message class and logfile listing, 3-12, 

7-20 
MESSAGE system action request macro with 

job's logfile, 3-3 
MF parameter 

on the ACCESS control statement, 9-9 
on the ACQUIRE control statement, 10-3 
on the DISPOSE control statement, 10-8 
on the FETCH control statement, 10-12 
MFL parameter on the JOB control statement, 
7-2 

in memory allocation, 3-4 
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MHB (Interjob Conununication Message Buffer) 
described, A-54; also see message buffer 
MM parameter 

on the CHARGES control statement, 

7-17 
on the LDR control statement, 14-10 
MMEPS parameter on the LDR control 

statement, 14-10 
MMLOC parameter on the LDR control 

statement, 14-10 
MOD parameter 

on the ACCESS control statement, 9-11 
on the selective load directives, 
14-14 
MODIFY 

to change information from, 9-16 
for new permanent datasets, 6-7 
for public access mode declaration, 6-9 
MODE 

control statement - Set operating mode 

described, 7-3 
system verb, 4-3 

verb - Sets or clears mode bits in the 
job's Exchange Package, 6-2 
Modes of field length reduction described, 

3-4 to 3-6 
Modifiers to indicate attributes selected 

from attributes dataset, 9-4 
MODIFY 

control statement - Modify permanent 

dataset, 9-16 to 9-18 
system verb, 4-3 
used with existing permanent datasets, 

6-7 
verb described, 6-5 
Module 

absolute load, 6-15 

heading for global cross-reference 

listing, 13-24 
name specified on the selective load 

directives, 14-14 
partially relocated, 14-1, 14-14 
relocatable, 6-15, 14-6 
Modules 

added to an existing library dataset, 

15-9 
listed alphabetically, specified on 

BUILD, 15-3 
loaded and linked in memory, 14-1 
omitted through the OMIT directive for 
BUILD, 15-6 
MR parameter on the ASSIGN control 
statement, 8-5 

to define a memory-resident dataset, 
2-2 
MS value for the DT parameter on ASSIGN, 

8-4 
MSG parameter 

on the ACCESS control statement, 9-6 
on the ACQUIRE control statement, 10-5 
on the ADJUST control statement, 9-16 
on the DELETE control statement, 9-20 
on the MODIFY control statement, 9-18 
on the PERMIT control statement, 9-21 
on the SAVE control statement, 9-3 



MT value for the DC parameter 

on ASSIGN, 8-6 

on DISPOSE, 10-7 
Multiprocessing, 1-1 
Multiprogramming, 1-1 
Multitasked job step, 3-3, 3-12 
Multitasking, 1-1 



N value 

for the AM parameter on PERMIT, 9-20 
for the BO output formatting parameter 

on AUDIT, 11-11 
for the LO output formatting parameter 

on AUDIT, 11-11 
for the PAM parameter 
on MODIFY, 9-18 
on SAVE, 9-4 
NA parameter 

on the ACCESS control statement, 9-6 
on the ADJUST control statement, 9-16 
on the DELETE control statement, 9-19 
on the LDR control statement, 14-7 
on the MODIFY control statement, 9-18 
on the PDSLOAD control statement, 11-7 
on the PERMIT control statement, 9-21 
on the SAVE control statement, 9-3 
NAME field on ITEMIZE listing, 13-27 
NAPW parameter on the ACCOUNT control 

statement, 7-14, 7-15 
NBF option on the CHARGES control 

statement, 7-17 
NBL parameter on the BUILD control 

statement, 15-2 to 15-3 
NCB, see Node Control Block 
New 

account password parameter, 7-15 
permanent datasets, atributes for, 

6-7 
user password parameter, 7-15 
NEW parameter on the ACCESS control 
statement, 9-8, 9-11 

to access a tape dataset, 2-3 
NF parameter 

on the COPYF control statement, 12-2 
on the DSDUMP control statement, 13-10 
on the ITEMIZE control statement, 

13-25 
on the SKIPF control statement, 12-5 
NID parameter on the PDSLOAD 

control statement, 11-6 
No release parameter 
on DISPOSE, 10-9 
on SUBMIT, 10-10 
Node Control Block (NCB) 

in closing communication, B-4 
described, A-54 

in establishing communication, B-2 
in Interjob Communication, B-2, B-4 
to send and receive messages, B-4 
NODIR parameter on the BUILD control 

statement, 15-3 
NOECHO parameter on the LDR control 
statement, 14-8 
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NOF parameter on the ASSIGN control 

statement with SZ option, 8-2, 8-3 
NOLIB parameter on the LDR control 

statement, 5-1, 14-4 
Non-specific volume allocation defined, 

2-3 
Nonrerunnability, reasons for, 3-7 
NORDER parameter on the FTREF control 

statement, 13-19 
NORED parameter on the LDR control 
statement, 14-9 

in memory management, 3-7 
NORERUN 

control statement - Control 

detection of nonrerunnable functions, 
7-7 to 7-8 
system verb, 4-3 
verb described, 6-2 
Normal 

advance job described, 3-3 
job advancement with the EXIT 

statement, 3-8 
termination of a job step, 3-9 
NOTBLKS parameter on the DEBUG control 

statement, 13-8 
NOTE error message, 14-8 
Notes 

associated with a dataset, 10-5, 

9-19 
attribute, 6-6 

modifier on SAVE, 9-5 
NOTES 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
parameter 

on the ACQUIRE control statement, 

10-5 
on the MODIFY control statement, 

9-19 
on the SAVE control statement, 9-5 
value for the ADN parameter on SAVE, 
9-4 
NOTSYMS parameter on the DEBUG control 

statement, 13-8 
NOWAIT parameter on the DISPOSE control 

statement, 10-9 
NOWN parameter on the PDSLOAD control 

statement, 11-6 
NR parameter 

on the COPYR control statement, 12-2 
on the DSDUMP control statement, 13-10 
on the SKIPR control statement, 12-4 
on the WRITEDS control statement, 12-7 
NREW parameter on the ITEMIZE control 

statement, 13-25 
NRLS parameter 

on the DISPOSE control statement, 10-9 
on the SUBMIT control statement, 10-10 
NS parameter 

on the COPYU control statement, 12-3 
on the DSDUMP control statement, 13-10 
Null 

record, effect of control word on the, 
2-9 



Null (continued) 

string values in positional parameters, 
4-6 
Number of decimal sectors parameter on 

ASSIGN, 8-5 
NUPW parameter on the ACCOUNT control 

statement, 7-14, 7-15 
NW parameter on the DSDUMP control 

statement, 13-10 
NX parameter on the LDR control statement, 

14-5 
NXP parameter on the DUMP control 

statement, 13-3 



parameter 

on the COPYD control statement, 

12-3 
on the COPYF control statement, 

12-2 
on the COPYR control statement, 

12-1 
on the COPYU control statement, 

12-3 
on the DEBUG control statement, 

13-7 
on the DSDUMP control statement, 

13-10 
on the DUMP control statement, 13-3 
on the PDSDUMP control statement, 

11-4 
on the PDSLOAD control statement, 
11-7 
value for the FORMAT parameter on DUMP, 
13-3 
Object 

code libraries described, 5-2 
library management, section 15 

summarized, 6-15 thru 6-16 
module, relocatable, 6-15 
OBL parameter on the BUILD control 

statement, 15-2 
ODN (Open Dataset Name Table) , A-33 
OFF 

parameter on the ECHO control 

statement, 7-19 
value 

for the C parameter of LDR, 14-6 
for the CV parameter, 8-6, 9-12 
for the MAP parameter on LDR, 
14-4 
OLM parameter on the JOB control statement, 

7-2 
OMIT directive for BUILD, 15-6 to 15-7 
ON 

parameter on the ECHO control 

statement, 7-19 
value 

for the C parameter on LDR, 14-6 
for CV parameter, 8-6, 9-12 
for the MAP parameter on LDR, 
14-4 
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Open Dataset Name Table (ODN) described, 

A-33 
OPEN macro call used in creating a 

temporary dataset, 2-12 
Operand range error interrupt mode, 7-4 
Operands 

expression, 16-13 to 16-16 
Operating system 

function described, 1-1 
requests for datasets, 2-1 
Operators 

arithmetic, 16-18 
expression, 16-16 to 16-17 
logical, 16-18 
relational, 16-18 
OPT (Option Table) , A-34 
OPTION 

control statement - Set user-defined 

options, 7-21 
system verb, 4-3 
verb described, 6-3 
Option Table (OPT) described, A-34 
ORI parameter on the MODE control 

statement, 7-4 
Origin heading for global cross-reference 

listing, 13-24 
Output 

for binary library datasets, 13-27 
dataset deleted at job termination, 

3-4 
datasets 

disposition of, 2-14 
permanent, described, 1-6 
formatting, parameters on AUDIT, 11-11 
interactive formats, 2-9 
placed on system mass storage, 3-3 to 
3-4 
Output dataset and user tape end-of-volume 

processing, 2-4 
Overflow 

and use of the NOF parameter on ASSIGN, 
8-3 
Overhead in tape subsystem, reduction in, 

2-3 
Overlay 

described, 14-17 

directives described, 14-18 thru 14-34 

execution 

type 1, 14-24 
type 2, 14-32 
generated by the Relocatable Loader, 

6-15 
generation 

described, 14-17 
directives for, 14-20, 14-29 
type 1, rules for, 14-23 to 14-24 
log described, 14-34 
rules for type 2 overlays, 14-31 
load parameter on LDR, 14-6 
loading Type 1, illustrated, 14-21 
tree, type 2 illustrated, 14-27 
type 1 described, 14-19 
type 2 

loading example, 14-28 
structure described, 14-26 



OVL parameter on the LDR control statement, 

14-6 
OVLDN directive described, 14-18 to 14-19 
OVLL directive for type 2 overlay 

generation, 14-29 to 14-30 
OWN parameter 

on the ACCESS control statement, 9-8 
on the ACQUIRE control statement, 10-4 
on the AUDIT control statement, 11-10 
on the PDSDUMP control statement, 11-3 
on the PDSLOAD control statement, 11-6 
Ownership value 

in attribute association, 6-10 
parameter 

on ACCESS, 9-8 
on ACQUIRE, 10-4 
user parameter on PERMIT, 9-21 



parameter on the JOB control statement, 

9-2 
value 

for the BO output formatting 

parameter on AUDIT, 11-11 
for the FORMAT parameter on DUMP, 

13-3 
for the LO output formatting 
parameter on AUDIT, 11-11 
PAD parameter on the LDR control statement, 
14-9 

in memory management, 3-7 
Page number on load map, 14-12 
PAGES parameter on the DEBUG control 

statement, 13-8 
PAM, see also Public access mode 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
parameter 

on the ACQUIRE control statement, 

10-4 
on the MODIFY control statement, 

9-18 
on the SAVE control statement, 9-4 
value 

for the ACC parameter on AUDIT, 

11-10 
for the ADN parameter on SAVE, 9-4 
Parameter 

interpretation described, 4-7 
separator described, 4-5 
substitution, 7-10 
Parameters 

described, 4-4 
formal 

in complex procedures, 16-22 
for substitution, 16-25 
keyword, 4-4 

keyword described, 16-28 
positional, 4-4 
positional and keyword, 16-28 
positional described, 16-28 
substitution 

in complex procedures, 16-22 
described, 16-27 
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Parentheses 

delimiters described, 4-5 
for key word parameters, 16-29 
Parenthetic 

and literal string values, 16-30 
strings, 16-20 
PART 

field on ITEMIZE listing, 13-27, 

13-28 
value 

for the C parameter on LDR, 14-6 
for the CB parameter on FTREF, 13-18 
for the MAP parameter on LDR, 14-4 
for the TREE parameter on FTREF, 
13-18 
PARTIAL parameter on the DELETE control 

statement, 9-19, 9-20 
Partially 

deleted datasets, 6-11 
relocated modules described, 14-14 
Partitioning value parameter on the ASSIGN 

control statement, 8-3 
Password, account parameter for new, 

7-14, 7-15 
PAT, see Public access tracking 
PDM, see Permanent Dataset Manager 
PDN parameter 

on the ACCESS control statement, 

9-7, 9-9 
on the ACQUIRE control statement, 10-2 
on the AUDIT control statement, 11-9 
on the MODIFY control statement, 9-17 
on the PDSDUMP control statement, 11-2 
on the PDSLOAD control statement, 11-6 
on the SAVE control statement, 9-2 
PDS parameter 

on the PDSDUMP control statement, 11-2 
on the PDSLOAD control statement, 11-6 
PDSDUMP 

utility - Dump permanent datasets, 
11-2 

described, 11-1 
verb for permanent datasets, 6-13 
PDSLOAD 

utility - Load permanent datasets, 
11-5 to 11-8 
described, 11-1 
used with existing permanent 
datasets, 6-7 
verb for permanent datasets, 6-13 
Permanent Dataset 
Catalog 

ACQUIRE and, 10-1 
in the Cray Operating System, 1-3 
linkage to at startup, 1-2 
Definition Table (PDD) described, A-18 

thru A-28 
Manager 

information on logfile, 3-12 
mass storage datasets controlled by, 
6-4 



Permanent datasets 

attributes for, 6-7 
availability, 1-6 
cessation of permanence, 1-6 
classified, 2-14 
deletion of, 1-6 
described, 2-14 
maintenance, 1-6 
management, section 9 

control statements described, 6-5 
name omitted from the ACCESS 

request, 2-3 
utilities, 6-13, section 11 
mass storage described, 2-14 
recovery, 1-6 
reestablishment, 1-6 
system, described, 2-14 
user, 2-14 
Permission control words defined, 1-6, 

6-4 
PERMIT 

control statement - Explicitly 

control access to dataset, 9-20 to 

9-21 
attributes dataset used with, 6-8 
system verb, 4-3 
verb described, 6-5 
Permit 

defined, 6-9 

list modifier on SAVE, 9-4 
parameter removed, 9-21 
PERMITS 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
value for the ADN parameter on SAVE, 
9-4 
Permits attribute, 6-6 
PFI (Previous File Index) , 2-8 
Physical characteristics of tape devices 

summarized, 1-7 
PL (Program Library) , 5-1 
Plot dataset value on DC parameter, 10-6 

specified on ASSIGN, 8-6 
Position macro 

and tape mark processing, 2-5 
Positional 

and keyword parameters, 16-28 
parameters described, 16-28 
POVL directive for overlay generation, 

14-22 
PR 

disposition code, 2-15 

at job initiation, 3-3 
value for the DC parameter 
on ASSIGN, 8-5 
on DISPOSE, 10-6 
Previous 

file index in record control word, 

2-8 
record index field in record control 
word, 2-8 
PRI, 2-8 
Primary overlays, 14-19, 14-20 
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PRINT 

as analytical aid, 6-14 
system verb, 4-3 

utility - Write value of expression to 
logfile, 13-14 
Print dataset value on DC parameter, 10-6 

specified on ASSIGN, 8-5 
PRINT utility 

summarized, 13-1 
Priority level specified on the JOB control 

statement, 7-2 
Privacy 

permanent dataset, enabled, 11-1 
provided by the ACCOUNT control 

statement, 7-14 
restriction for' mass storage datasets, 
6-8 
Private datasets, accessibility to, 6-9 
Privileges defined, 14-8 to 14-9 
PROC 

control statement - Begin procedure 

definition, 16-24 
in complex procedures, 16-23 
effect on procedure definition, 7-10 
system verb, 4-3 
used with ECHO, 7-20 
Procedure 

begun with PROC, 16-24 
complex, 16-22 

elements described, 16-23 
elements illustrated, 16-24 
defined, 16-21 
definition, 7-10 

body in complex procedures, 16-23 
body described, 16-26 
deck structure illustrated, 16-24 
described, 16-21 thru 16-34 
library described, 5-1 
name call for complex procdures, 16-22 
simple, 16-21 

substitution, examples, 16-30 thru 16-34 
Processing, reprieve 

error codes for, E-l to E-7 
Program 

creation, executable, 6-15, 

section 14 
Description Table 

flag set for relocatable overlay, 

14-15 
and relocatable overlays, 14-17 
execution defined by job control 

language, 4-1 
library described, 5-1 
module 

deleted from a library, 15-10 
extracted from a library, 15-10 
names and BUILD directives, 15-3 
ranges and BUILD directives, 15-4 
PROT parameter on the ACCESS control 

statement, 9-11 
Protecting mass storage datasets, 6-8 
Prototype control statement to introduce a 
in complex procedures, 16-23 
procedure, 16-25 to 16-26 



PT 

value for the DC parameter 
on ASSIGN, 8-6 
on DISPOSE, 10-6 
PU value for the DC parameter 
on ASSIGN, 8-5 
on DISPOSE, 10-6 
Public 

access tracking attribute 
described, 6-6 
modifier on SAVE, 9-4 
datasets, accessibility to, 6-9 
Public access mode 
attribute 

described, 6-6 
modifier on SAVE, 9-4 
parameter 

on ACQUIRE, 10-4 
on MODIFY, 9-18 
on SAVE, 9-4 
Punch dataset value for DC parameter, 10-6 
specified on ASSIGN, 8-5 



Queued Dataset Table (QDT) , 11-2 



R 

parameter 

on the ACCESS control statement, 

9-7 
on the ACQUIRE control statement, 

10-3 
on the DISPOSE control statement, 

10-8 
on the MODIFY control statement, 

9-17 
on the SAVE control statement, 9-3 
value 

for the AM parameter on PERMIT, 

9-20 
for the PAM parameter on MODIFY, 

9-18 
for the PAM parameter on SAVE, 9-4 
Random dataset parameter on ASSIGN, 8-4 
Range specifier for program module ranges, 

15-4 
RCB (Receptive Control Block) described, 

A-53 
RCW, see Record control word 
RDM parameter on the ASSIGN control 

statement, 8-4 

Read control word 

parameter 

on ACCESS, 9-7 
on ACQUIRE, 10-3 
on DISPOSE, 10-8 
on SAVE, 9-3 
REC field on ITEMIZE listing, 13-27 
Receptive Control Block (RCB) 

in closing communication, B-4 
described, A-53 

in establishing communication, B-2 
in Inter job Communication, B-2, B-4 
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Record 

format parameter 

on ACCESS, 9-13 to 9-14 
on ASSIGN, 8-7 to 8-8 
positioning unavailable with 
interactive datasets, 2-3 
Record control word (RCW) , 2-6 
described, 2-7 thru 2-9 
end-of -record, 2-9 

not covered by TR on ASSIGN, 8-4 
for interchange tape format, 2-11 
Recording format parameter on ACCESS, 

9-10 
Records 

blocked 

copied, 12-1 
skipped, 12-3 
CDC format, 9-13 to 9-14 
copied, 6-13 
IBM format, 9-13 
skipped, 6-14 

variable-length, processing of, 2-6 
RECORDS field on ITEMIZE listing, 13-27 
Recovery 

dump, 13-15 

of jobs through reprieve processing, 
3-9 
References heading for global 

cross-reference listing, 13-24 
Registers 

content examined with DUMPJOB, 6-14 
dumped with DUMP, 13-2 
Relational 

operators, 16-18 
RELEASE 

control statement - Release dataset, 

8-10 
function request used for temporary 

datasets, 2-12 
request, effect on the DEFER parameter 

of DISPOSE, 10-9 
system verb, 4-3 
verb described, 6-3 
Relocatable 

loading of blocks of an overlay, 14-29 
modules described, 6-15 
overlay, 14-1 

described, 14-14 
Relocatable Loader 
described, 14-1 

in executable program creation, 6-15 
and object code libraries, 5-2 
RELOCOVL parameter on MODULE pseudo-op for 

relocatable overlays, 14-15 
REMARK subroutine with job's logfile, 3-3 
REMARK2 subroutine with job's logfile, 

3-3 
REMARKF subroutine with job's logfile, 

3-3 
REPLACE parameter on the BUILD control 

statement, 15-3 
Report, formatted 

printed with ITEMIZE, 13-24 



Reprieve processing 

error codes for, E-l to E-7 
and exit processing, 3-8 
Requests delayed with ACCESS, 9-6 
RERUN 

control statement - Unconditionally 

set job rerunnability, 7-8 
system verb, 4-3 
verb described, 6-2 
Rerunnability conditions summarized, 3-7 
Rerunnable, declaration of a job as, 3-8 
Resource, dedicated 

specified on the JOB control statement, 
7-3 
Restrictions for mass storage datasets, 

6-8 
Retention period parameter 
on ACCESS, 9-12 
on ACQUIRE, 10-2 
on DISPOSE, 10-8 
for new, 9-17 
on SAVE, 9-2 
RETURN 

control statement - Return control 

to caller, 7-13 
system verb, 4-3 
verb described, 6-2 
REWIND 

command and volume switching, 2-3 

system verb, 4-3 

unavailable with interactive datasets, 

2-3 
utility - Rewind blocked or unblocked 
dataset, 12-6 
for local datasets, 6-14 
summarized, 12-1 
RP parameter 

on the ACCESS control statement, 9-14 

to 9-14 
on the ASSIGN control statement, 8-7 to 
8-8 
RING parameter on the ACCESS control 

statement, 9-9, 9-11 
RL parameter on the WRITEDS control 

statement, 12-7 to 12-8 
RGLLJOB 

control statement - Roll a user job 

to disk, 7-17 to 7-18 
system verb, 4-3 
verb described, 6-2 
ROOT directive for overlay generation, 

14-20 to 14-21 
ROOT parameter on the FTREF control 

statement, 13-19 
Routine levels and symbolic dumps, 13-7 
RP parameter 

on the PDSLOAD control statement, 11-6 
on the PERMIT control statement, 9-21 
RS parameter 

on the ACCESS control statement, 9-14 
defaults for IBM tape files 
on ACCESS, 9-14 
on ASSIGN, 8-8 to 8-9 
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RS parameter (continued) 

restrictions for IBM tape files 
on ACCESS, 9-15 
on ASSIGN, 8-8 to 8-9 

RT parameter 

on the ACCESS control statement, 9-12 
on the ACQUIRE control statement, 10-2 
on the DISPOSE control statement, 10-8 
on the MODIFY control statement, 9-17 
on the SAVE control statement, 9-2 



parameter 

on the ASSIGN control statement, 

8-2 
on the PDSDUMP control statement, 

11-4 
on the PDSLOAD control statement, 
11-7 
value 

for the RF parameter on ACCESS, 

9-13 
for the LO output formatting 

parameter on AUDIT, 11-11 
for the RF parameter on ASSIGN, 
8-8 
SAVE 

control statement - Save permanent 
dataset, 9-1 

in making a dataset permanent, 
2-12 
macro, 9-1 
MODIFY to change information from, 

9-16 
for new permanent datasets, 6-7 
for public access mode declaration, 

6-9 
requests to create permanent dataset, 

2-14 
system verb, 4-3 
verb described, 6-5 
Saved dataset, 1-6 
SBCA directive described, 14-19 
SC 

disposition code, 2-15 
at job initiation, 3-3 
when RELEASE is used, 8-10 
value for the DC parameter 
on ASSIGN, 8-5 
on DISPOSE, 10-6 
SCOPE internal tape format, value for 
on ACCESS, 9-13 
on ASSIGN, 8-7 
Scratch 

dataset value 

on DC parameter, 10-6 
specified on ASSIGN, 8-5 
described, 1-6 
temporary dataset as, 1-6 
disposition code with RELEASE, 8-10 



SDN parameter 

on the DISPOSE control statement, 10-6 
on the FETCH control statement, 10-11 
on the selective load directives, 
14-13 
SDR, see System Directory 
Second vector logical functional 

unit mode, 7-4 
Sector count rounded off, 8-2 
Sectors 

accessed, listed in logfile, 3-13 
used for temporary datasets, listed in 
logfile, 3-13 
SECURE parameter on the LDR control 

statement, 14-8 
Security provided by ACCOUNT control 

statement, 7-14 
Selective load 

described, 14-13 to 14-14 
parameter for, 14-8 
Semiprivate datasets, accessibility to, 

6-9 
Sense switch 

set or cleared, 7-7 
Separators described, 4-4 
Sequential processing altered by exit 

processing, 6-1 
Serial number 

CPU symbol for, 16-15 
SET 

control statement - Change symbol 
value, 7-18 

examples, 7-18 to 7-19 
parameter on the LDR control statement, 

14-7 
system verb, 4-3 
verb described, 6-2 
SETRPV subroutine in reprieve processing, 

3-10 
SETSP macro with user tape end-of-volume 

processing, 2-4 
SF parameter on the DISPOSE control 

statement, 10-8 
SI value for the F parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
SID, see also Symbolic Interactive Debugger 
parameter on the LDR control statement, 
14-5 

effect on CNS, 14-7 
parameter on the SUBMIT control 
statement, 10-10 
SIMABORT system verb, 4-3 
Simple 

control statement sequences 
described, 16-1 
summarized, 16-1 
procedure, 16-21 
Skip remainder of section field, 2-8 
SKIPD utility - Skip blocked dataset, 12-5 
for local datasets, 6-14 
summarized, 12-1 
SKIPF utility - Skip blocked files, 12-4 
for local datasets, 6-14 
summarized, 12-1 
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SKIPR utility - Skip blocked records, 12-4 

for local datasets, 6-14 

summarized, 12-1 
SKIPU utility - Skip unblocked dataset, 12-6 

summarized, 12-1 
SO parameter 

on the PDSDUMP control statement, 11-3 

on the PDSLOAD control statement, 11-7 
Solid-state Storage Device 

dataset space divided in, 8-3 

in hardware requirements, 1-2 
SORT parameter on the BUILD control 
statement, 15-3 

effect on file output sequence, 15-4 
Source file, 3-1 
SOVL directive for overlay generation, 

14-22 
Special form information parameter on 

DISPOSE, 10-8 
Specific 

alternate owners user category, 6-9 

volume allocation defined, 2-3 
SR parameter on the CHARGES control 

statement, 7-16 to 7-17 
SRS, 2-8 

SSD, see Solid-state Storage Device 
ST value for the DC parameter 

on ASSIGN, 8-5 

on DISPOSE, 10-6 
Stack processing initialized, 14-9 
Stage to front end value 

on DC parameter, 10-6 

specified on ASSIGN, 8-5 
Staged dataset name parameter, 10-11 

on DISPOSE, 10-6 
Stages of job flow described, 3-2 to 

3-4 
Staging 

defined, 6-11, 10-1 

control, 6-11 to 6-13 
STARTSP macro with user tape end-of-volume 

processing, 2-4 
Startup and the Cray Operating System, 

1-1 
STAT 

examples, 7—22 and 7—23 

parameter on the OPTION control 
statement, 7-21 
Statement terminator described, 4-5 
Stations, see Front-end computers 
Statistics 

on mass storage datasets created, 7-21 

printing dataset I/O statistics, 7-21 
and 7-22 

on system usage, 7-16 
Status codes described, E-7 thru E-ll 
STK parameter on the LDR control statement, 

14-9 
STP (System Task Processor) , 1-3 
Strings 

defined, 16-19 

literal, 16-19 to 16-20 

parenthetic, 16-20 



Subexpressions 

defined, 16-16 
SUBMIT control statement - Submit job 
dataset, 10-10 
system verb, 4-3 

verb for dataset staging control, 
6-12 
SUBSET directive for FTREF, 13-19 
Substitution 
parameters 

in complex procedures, 16-22 
described, 16-27 
Subsystem support 
described, B-l 
to develop code, B-l 
SWITCH control statement - Set or clear 
sense switch, 7-7 
system verb, 4-3 
verb described, 6-2 
Symbol 

heading for global cross-reference 

listing, 13-24 
parameter on the SET control statement, 

7-18 
value changed with SET, 7-18 
Symbolic 

dump produced, 6-14 
name assigned to user dataset, 2-16 
variable table, 16-15 to 16-16 
variables defined 16-14 thru 16-17 
Symbolic Interactive Debugger (SID) , 14-5 
Symbols 

dumped by DEBUG, 13-7 
local and global defined, 16-14 
SYMDEBUG library routine, 13-6 
SYMS parameter on the DEBUG control 

statement, 13-7 
Syntax 

control statement illustrated, 4-1 
violations 

described, 4-2 
and job step aborts, 4-2 
SYSREF utility - Generate global 

cross-reference listing, 13-22 to 13-24 
as analytical aid, 6-14 
summarized, 13-1 
use of, illustrated, 13-23 
System 

Bulletin listed in logfile, 3-13 
dataset name verbs described, 4-4 
debugging routines parameter, 14-5 
Directory 

access of datasets entered into, 

9-5 
loader accesses default libraries 

from the, 14-3 
Table described, 4-4 
error codes described, E-l to E-7 
Executive in the Cray Operating System, 

1-3 
failure, 1-6 

initialization summarized, 1-2 
in Inter job Communication, B-5 
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System (continued) 

management of memory described, 3-7 
permanent datasets described, 2-14 
requests, B-5 

resources used, parameter, 7-16 to 7-17 
Task Processor in the Cray Operating 

System, 1-3 
utility programs loaded into user 

field, 1-5 
verbs, 4-2, 4-3 
System-logical record type parameter on 

ASSIGN, 8-7 to 8-8 
SZ parameter 

on the ASSIGN control statement, 8-2 to 

8-3 
on the AUDIT control statement, 11-9 
SZ parameter with INC on the ASSIGN control 
statement, 8-3, 8-5 



parameter 

on the ITEMIZE control statement, 

13-25 
on the JOB control statement, 7-2 
on the LDR control statement, 14-5 
value 

for the BO output formatting 

parameter on AUDIT, 11-11 
for the DF parameter on COMPARE, 

13-13 
for the LO output formatting 
parameter on AUDIT, 11-11 
TA parameter 

on the ACQUIRE control statement, 10-5 
on ACQUIRE, SAVE, or MODIFY for dataset 

use tracking, 6-10 
on the MODIFY control statement, 9-18 
on the SAVE control statement, 9-4 
Tables, binary symbol, 13-22 
TAPE generic resource name, 9-8 
Tape Queue Manager 

tape mark processing by, 2-4 through 2-5 
Tape, see also Dataset; Magnetic tape block 
buffering area, Buffer Memory used 

as, 2-3 
defined, 2-11 

size parameter on ACCESS, 9-11 
controller in hardware requirements, 

1-2 
data moved, listed in logfile, 3-13 
dataset 

generic resource name parameter on 

ACCESS, 9-8 
label type parameter on ACCESS, 

9-10 
record size parameter 
on ACCESS, 9-14 
on ASSIGN, 8-7 
transparent format described, 2-12 
devices 

characteristics, 1-8 

reserved, listed in logfile, 3-13 



Tape (continued) 

files, MBS values on ACCESS, 9-11 
format 

described, 2-11 
internal, 8-7 
parameter on ACCESS, 9-13 
parameter on ASSIGN, 8-7 
magnetic, classification by label, 

2-3 
mark processing by TQM, 2-4 through 2-5 
Queue Manager 

Circular I/O routines communicate 

with, 2-18 
to control magnetic tape datasets, 
6-4 
resources specified on CHARGES control 

statement, 7-17 
subsystem, overhead reduction in, 2-3 
volumes mounted, listed in logfile, 

3-13 
write ring parameter on ACCESS, 9-9 
TAPESTAT macro 

and tape mark processing, 2-5 
with user tape end-of-volume 
processing, 2-4 
TASK option on the CHARGES control 

statement, 7-17 
TASKS parameter on the DEBUG control 

statement, 13-8 
TCR parameter on the AUDIT control 

statement, 11-10 
Temporary dataset 

creation of, 2-12 
described, 1-6 
in mass storage, 1-6 
as mass storage dataset, 2-12 
and memory-resident datasets, 2-2 
Terminal identifier parameter 
on ACQUIRE, 10-3 
on DISPOSE, 10-8 
on FETCH, 10-12 
Termination message parameter 
on ACCESS, 9-6 
on ACQUIRE, 10-5 
on ADJUST, 9-16 
on DELETE, 9-20 
on MODIFY, 9-18 
on PERMIT, 9-21 
on SAVE, 9-3 
Terminator in a control statement, 4-1 
Text 

attribute, 6-6 

modifier on SAVE, 9-4 
to be passed, parameter for 
on DISPOSE, 10-9 
on FETCH, 10-12 
on MODIFY, 9-19 
on SAVE, 9-4 
function, 6-12 

replaced through MODIFY command, 6-13 
Table and relocatable overlays, 14-17 
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TEXT 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
parameter 

on the ACQUIRE control statement, 

10-3 
on the DISPOSE control statement, 

10-9 
on the FETCH control statement, 

10-12 
on the MODIFY control statement, 

9-19 
on the SAVE control statement, 9-4 
value for the ADN parameter on SAVE, 
9-4 
TID parameter 

on the ACQUIRE control statement, 10-3 
on the DISPOSE control statement, 10-8 
on the FETCH control statement, 10-12 
Time 

in execution or waiting, 7-16, 7-17 
limit specified on the JOB control 

statement, 7-2 
waiting option on the CHARGES control 
statement, 7-16 
Timeout 

in event recall, B-7 
Times tamp conversion option 

parameter on PDSDUMP, 11-3 
TLA parameter on the AUDIT control 

statement, 11-10 
TLA parameter 

on the AUDIT control statement, 11-10 
on the PDSLOAD control statement, 11-7 
TPS option on the CHARGES control 

statement, 7-17 
TQM, see Tape Queue Manager 
TR value for the DF parameter 
on ACCESS, 9-10 
on ACQUIRE, 10-4 
on ASSIGN, 8-4 
on DISPOSE, 10-7 
on FETCH, 10-12 
TRACE parameter on the DEBUG control 

statement, 13-7 
Track 

accesses parameter 
on ACQUIRE, 10-5 
on MODIFY, 9-18 
on SAVE, 9-4 
size for controlled devices, 8-3 
TRACK 

modifier for the ADN parameter on 

ACQUIRE, 10-5 
value for the ADN parameter on SAVE, 
9-4 
Tracking of dataset use, 6-10 
Tracks 

dataset space allocation in, 1-6 
TRAN (Transparent record field) , 2-8 
Transfer 

data, B-6 

of data from front-end system, 10-1 

name parameter on LDR, 14-5 

in user channel access, B-6 



Transparent 
format 

value on ACQUIRE, 10-4 
value on DISPOSE, 10-7 
value on FETCH, 10-12 
for interactive output, 2-9 
record field in record control word, 

2-8 
tape format described, 2-11 
value 

for the DF parameter on ACCESS, 

9-10 
specified on ASSIGN, 8-4 
TREE parameter on the FTREF control 

statement, 13-18 
True value 

symbol for, 16-15 
Truncation 

of intermediate and final results, 16-18 
parameter on ITEMIZE, 13-25 
TS parameter on the PDSDUMP control 

statement, 11-3 
Type 1 overlay loading illustrated, 14-21 
Type 2 overlay 

execution described, 14-32 
structure described, 14-26 
TYPE field on ITEMIZE listing, 13-27 
Type parameter on the MODULE pseudo-op, 
14-15 



U 

parameter on the ASSIGN control 

statement, 8-4 
value 

for the RF parameter on ACCESS, 

9-13 
for the RF parameter on ASSIGN, 
8-7 
UBC (Unused bit count) , 2-8 
UBS, 2-8 
Unblocked 

dataset structure parameter on ASSIGN, 

8-4 
datasets copied, 6-13 
format described, 2-9 
Undefined-length records value 
on ACCESS, 9-13 
on ASSIGN, 8-7 
Unique access parameter 
on ACCESS, 9-8 
on ACQUIRE, 10-3 
on SAVE, 9-3 
Unit name parameter on the ASSIGN control 

statement, 8-6 
UNLOCK parameter on the IOAREA control 

statement, 7-9 
Unsatisfied external 

abort parameter, 14-7 
program and relocatable overlays, 
14-16 
Unused bit count field (UBC) , 2-8 
UPDATE for program libraries, 5-1 
Update time of last access parameter on 
PDSLOAD, 11-7 
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UPW parameter on the ACCOUNT control 

statement, 7-15 
UQ parameter 

on the ACCESS control statement, 9-8 
on the ACQUIRE control statement, 10-3 
relation to MODIFY, 9-16 
on the SAVE control statement, 9-3 
US parameter 

on the ACCOUNT control statement, 

7-15 
on the AUDIT control statement, 11-9 
on the JOB control statement, 7-2 
on the PDSLOAD control statement, 11-6 
USA parameter on the LDR control statement, 

14-7 
User 

area of memory 

described, 1-4 thru 1-5 
for a job, 3-5 
code location in user field, 

illustrated, 3-5 
dataset 

naming conventions described, 

2-16 
symbolic name assigned to, 2-16 
field, see also User area of memory 
described, 1-5 
at job initiation stage, 3-3 
length in job size, 3-4 
in memory, 1-4 
I/O interfaces described, 2-16 thru 2-18 
management of memory described, 3-6 
number 

parameter on the ACCOUNT control 

statement, 7-15 
specified on the JOB control 

statement, 7-2 
validated, 7-14 
ownership value parameter, 9-21 
password parameter, 7-15 
permanent datasets protected, 2-14 
programs loaded into user field, 1-5 
USER 

information on logfile, 3-12 
parameter 

on the MEMORY control statement, 

7-5 
on the PERMIT control statement, 
9-21 
User channel access 

described, B-5 and B-6 
User Driver Parameter Block (DRPB) 

described, A-49 
User identification 

additional, parameter for, 9-17 
on ACCESS, 9-7 
on ACQUIRE, 10-2 
on DISPOSE, 10-8 
parameter on SAVE, 9-2 
specified, 11-3 
User tape end-of-volume processing, 2-4 
User's 

exchange processing saved on reprieve 

processing, 3-10 
stack space, 7-9 



User-defined options set, 7-21 
User-managed field length reduction mode, 
3-5, 3-6 

in memory management, 3-7 
USX, see Unsatisfied external program 
Utilities 

local dataset, 6-13 to 6-14 

permanent dataset, 6-13 

provide analytical aids, summarized, 
13-1 
Utility 

program BUILD, 15-1 

routines examples, 11-1 



V 

parameter 

on the DUMP control statement, 13-3 
on the LIBRARY control statement, 
7-21 
value for RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
Value 

of an expression written to logfile, 

13-14 
heading for global cross-reference 
listing, 13-24 
Variable-length records 
value for 

on ACCESS, 9-13 
on ASSIGN, 8-7 
processing of, 2-6 
Variables 

symbolic defined, 16-14 thru 16-17 
VB value for the RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
VBS value for the RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-7 
Vector mask register saved on reprieve 

processing, 3-10 
Verbs 

in a control statement, 4-1 

for dataset definition, 6-3 

described, 4-2 to 4-4 

for job definition, described, 6-2 

not found by the Cray Operating System, 

4-2 
types, 4-2 
VI, see Volume identifier 
VOL parameter on the ACCESS control 

statement, 9-9 
Volume 

identifier list 
parameter, 9-9 
capacity, 2-3 
sequence number parameter on ACCESS, 
9-9 to 9-10 
Volume 1 entry in the Label Definition 

Table, A-40 to A-42 
Volumes switched during tape dataset 

processing, 2-3 
VSN, see Volume identifier 
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w 

parameter 

on the ACCESS control statement, 

9-7 
on the ACQUIRE control statement, 

10-3 
on the DISPOSE control statement, 

10-8 
on the MODIFY control statement, 

9-17 
on the SAVE control statement, 9-3 
value 

for the AM parameter on PERMIT, 

9-20 
for the PAM parameter on MODIFY, 

9-18 
for the PAM parameter on SAVE, 9-4 
for RF parameter on ACCESS, 9-13 
for the RF parameter on ASSIGN, 
8-8 
WAIT parameter on the DISPOSE control 

statement, 10-9 
WARNING error message, 14-8 
Write 

control word parameter 
on ACCESS, 9-7 
on DISPOSE, 10-8 
on SAVE, 9-3 
dataset value on DC parameter, 10-7 
permission control word parameter, 
9-17 
WRITEDS utility - Initialize a blocked 
random or sequential dataset, 12-7 
for local datasets, 6-14 
summarized, 12-1 
WT option on the CHARGES control statement, 
7-16 



X 

parameter 

on the AUDIT control statement, 

11-10 
on the ITEMIZE control statement, 

13-25 
on the PDSDUMP control statement, 

11-3 
on the SYSREF control statement, 
13-22 
value for the FORMAT parameter on DUMP, 
13-3 
XDT parameter on the ACCESS control 

statement, 9-12 
XIOP (Auxiliary I/O Processor) , 1-7 



Z 

parameter on the DSDUMP control 

statement, 13-11 
value for RF parameter 
on ACCESS, 9-13 
on ASSIGN, 8-8 
Zero-byte record type 

value on ASSIGN, 8-8 
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